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 0ac100a776c167181c0889adde107e822563b3f7 1 parent ef420d8
@larsmagne larsmagne authored
View
9 lisp/ChangeLog
@@ -1,5 +1,14 @@
+Thu Aug 31 10:45:26 1995 Lars Magne Ingebrigtsen <lingebri@sunsci4.cern.ch>
+
+ * gnus-cus.el (gnus-face-dark-name-list): Use dark blue instead of
+ sky blue.
+
+ * gnus.el: Don't read the .gnus file on load, anyway.
+
Wed Aug 30 17:56:34 1995 Lars Magne Ingebrigtsen <lingebri@sunscipw.cern.ch>
+ * gnus.el: 0.99.28 is released.
+
* custom.el ((string-match "XEmacs" emacs-version)): Would barf if
the menu-bar wasn't in use.
View
6 lisp/custom.el
@@ -251,8 +251,10 @@ If called interactively, prompts for a face and face attributes."
(if (string-match "XEmacs" emacs-version)
nil
;; This will not work under XEmacs.
- (global-set-key [ menu-bar help-menu customize ]
- '("Customize..." . customize)))
+ (condition-case nil
+ (global-set-key [ menu-bar help-menu customize ]
+ '("Customize..." . customize))
+ (error nil)))
;;; Categories:
;;
View
6 lisp/gnus-cus.el
@@ -40,7 +40,7 @@
"turquoise"))
(defvar gnus-face-dark-name-list
- '("skyblue" "firebrick"
+ '("dark blue" "firebrick"
"dark green" "dark orange" "dark khaki" "dark violet"
"dark turquoise"))
@@ -326,7 +326,7 @@ alone.")
((eq gnus-background-mode 'dark)
(list (list "From" nil
(custom-face-lookup
- "SkyBlue" nil nil t t nil))
+ "dark blue" nil nil t t nil))
(list "Subject" nil
(custom-face-lookup
"pink" nil nil t t nil))
@@ -460,7 +460,7 @@ mark: The article's mark.")
(custom-face-lookup "pink" nil nil nil nil nil))
(cons '(and (> score default) (= mark gnus-ancient-mark))
- (custom-face-lookup "SkyBlue" nil nil t nil nil))
+ (custom-face-lookup "dark blue" nil nil t nil nil))
(cons '(and (< score default) (= mark gnus-ancient-mark))
(custom-face-lookup "SkyBlue" nil nil nil t nil))
(cons '(= mark gnus-ancient-mark)
View
4 lisp/gnus.el
@@ -1343,7 +1343,7 @@ variable (string, integer, character, etc).")
"gnus-bug@ifi.uio.no (The Gnus Bugfixing Girls + Boys)"
"The mail address of the Gnus maintainers.")
-(defconst gnus-version "(ding) Gnus v0.99.28"
+(defconst gnus-version "Gnus v5.0"
"Version number for this version of Gnus.")
(defvar gnus-info-nodes
@@ -1836,7 +1836,7 @@ Thank you for your help in stamping out bugs.
(load gnus-init-file nil t))))
;;; Load the user startup file.
-(eval '(gnus-read-init-file 'inhibit))
+;; (eval '(gnus-read-init-file 'inhibit))
;;; Load the compatability functions.
View
2  lisp/nnbabyl.el
@@ -48,7 +48,7 @@
(defvar nnbabyl-mail-delimiter "\^_")
-(defconst nnbabyl-version "nnbabyl 0.1"
+(defconst nnbabyl-version "nnbabyl 1.0"
"nnbabyl version.")
(defvar nnbabyl-mbox-buffer nil)
View
2  lisp/nndir.el
@@ -34,7 +34,7 @@
-(defconst nndir-version "nndir 0.0")
+(defconst nndir-version "nndir 1.0")
(defvar nndir-current-directory nil
"Current news group directory.")
View
2  lisp/nndoc.el
@@ -80,7 +80,7 @@ Possible values:
'(nndoc-body-begin nil)
'(nndoc-address nil)))
-(defconst nndoc-version "nndoc 0.1"
+(defconst nndoc-version "nndoc 1.0"
"nndoc version.")
(defvar nndoc-current-buffer nil
View
2  lisp/nneething.el
@@ -43,7 +43,7 @@
-(defconst nneething-version "nneething 0.1"
+(defconst nneething-version "nneething 1.0"
"nneething version.")
(defvar nneething-current-directory nil
View
2  lisp/nnfolder.el
@@ -73,7 +73,7 @@ such things as moving mail. All buffers always get killed upon server close.")
-(defconst nnfolder-version "nnfolder 0.2"
+(defconst nnfolder-version "nnfolder 1.0"
"nnfolder version.")
(defconst nnfolder-article-marker "X-Gnus-Article-Number: "
View
2  lisp/nnkiboze.el
@@ -39,7 +39,7 @@
-(defconst nnkiboze-version "nnkiboze 0.0"
+(defconst nnkiboze-version "nnkiboze 1.0"
"Version numbers of this version of nnkiboze.")
(defvar nnkiboze-current-group nil)
View
2  lisp/nnmail.el
@@ -210,7 +210,7 @@ perfomed.")
-(defconst nnmail-version "nnml 0.0"
+(defconst nnmail-version "nnmail 1.0"
"nnmail version.")
View
2  lisp/nnmbox.el
@@ -46,7 +46,7 @@
-(defconst nnmbox-version "nnmbox 0.1"
+(defconst nnmbox-version "nnmbox 1.0"
"nnmbox version.")
(defvar nnmbox-current-group nil
View
2  lisp/nnmh.el
@@ -48,7 +48,7 @@
-(defconst nnmh-version "nnmh 0.1"
+(defconst nnmh-version "nnmh 1.0"
"nnmh version.")
(defvar nnmh-current-directory nil
View
2  lisp/nnml.el
@@ -58,7 +58,7 @@ all. This may very well take some time.")
-(defconst nnml-version "nnml 0.2"
+(defconst nnml-version "nnml 1.0"
"nnml version.")
(defvar nnml-nov-file-name ".overview")
View
2  lisp/nnvirtual.el
@@ -35,7 +35,7 @@
-(defconst nnvirtual-version "nnvirtual 0.0"
+(defconst nnvirtual-version "nnvirtual 1.0"
"Version number of this version of nnvirtual.")
(defvar nnvirtual-group-alist nil)
Please sign in to comment.
Something went wrong with that request. Please try again.