Mercurial > emacs
diff lisp/gnus/gnus-util.el @ 59996:aac0a33f5772
Change release version from 21.4 to 22.1 throughout.
Change development version from 21.3.50 to 22.0.50.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Wed, 09 Feb 2005 15:50:47 +0000 |
parents | 22da0004ae3c |
children | a03b1bd1f66c 3ebd9bdb4fe5 |
line wrap: on
line diff
--- a/lisp/gnus/gnus-util.el Tue Feb 08 23:51:31 2005 +0000 +++ b/lisp/gnus/gnus-util.el Wed Feb 09 15:50:47 2005 +0000 @@ -1125,7 +1125,7 @@ (standard-output (lambda (c) (aset ,buffer ,leng c) - + (if (= ,size (setq ,leng (1+ ,leng))) (progn (write-region ,buffer nil ,file ,append 'no-msg) (setq ,leng 0 @@ -1194,7 +1194,7 @@ Setting it to nil has no effect after the first time `gnus-byte-compile' is run." :type 'boolean - :version "21.4" + :version "22.1" :group 'gnus-various) (defun gnus-byte-compile (form) @@ -1560,8 +1560,8 @@ (setq temp (cdr temp))) (= (length temp) 0)) (delete-directory old-dir) - (setq old-dir (file-name-as-directory - (file-truename + (setq old-dir (file-name-as-directory + (file-truename (concat old-dir "..")))))))))