Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

*** empty log message ***

  • Loading branch information...
commit f3be825091b4e31a35b234409edc3f7c198c2660 1 parent 62784c8
@larsmagne larsmagne authored
Showing with 13 additions and 4 deletions.
  1. +9 −1 lisp/ChangeLog
  2. +1 −1  lisp/gnus.el
  3. +3 −2 lisp/nnheader.el
View
10 lisp/ChangeLog
@@ -1,4 +1,12 @@
-Fri Aug 4 00:08:59 1995 Lars Magne Ingebrigtsen <lingebri@sunsci7.cern.ch>
+Fri Aug 4 03:44:13 1995 Lars Magne Ingebrigtsen <lingebri@sunsci4.cern.ch>
+
+ * gnus.el: 0.99.5 is released. (Hah!)
+
+ * nnheader.el (nnheader-find-file-noselect): Did not work.
+
+Fri Aug 4 00:08:59 1995 Lars Magne Ingebrigtsen <lingebri@sunsci4.cern.ch>
+
+ * gnus.el: 0.99.4 is released.
* nnheader.el (nnheader-find-file-noselect): New function.
* nnfolder.el (nnfolder-read-folder): Use it.
View
2  lisp/gnus.el
@@ -1308,7 +1308,7 @@ variable (string, integer, character, etc).")
(defconst gnus-maintainer "gnus-bug@ifi.uio.no (The Gnus Bugfixing Girls + Boys)"
"The mail address of the Gnus maintainers.")
-(defconst gnus-version "(ding) Gnus v0.99.4"
+(defconst gnus-version "(ding) Gnus v0.99.5"
"Version number for this version of Gnus.")
(defvar gnus-info-nodes
View
5 lisp/nnheader.el
@@ -212,10 +212,11 @@
(or
(get-file-buffer file)
(prog1
- (get-buffer-create (create-file-buffer file))
+ (set-buffer (get-buffer-create (create-file-buffer file)))
(and (file-exists-p file)
(not (file-directory-p file))
- (insert-file-contents file))))))
+ (insert-file-contents file))
+ (set-visited-file-name file)))))
(provide 'nnheader)
Please sign in to comment.
Something went wrong with that request. Please try again.