+Mon Jan 27 18:03:17 1997 Lars Magne Ingebrigtsen <larsi@menja.ifi.uio.no>
+
+ * gnus.el: Gnus v5.4.5 is released.
+
+Mon Jan 27 18:00:46 1997 Lars Magne Ingebrigtsen <larsi@menja.ifi.uio.no>
+
+ * gnus.el: Gnus v5.4.5 is released.
+
+Mon Jan 27 17:35:21 1997 Lars Magne Ingebrigtsen <larsi@ifi.uio.no>
+
+ * message.el (message-expand-group): Don't skip over ":".
+
+ * gnus-score.el (gnus-score-find-bnews): Wouldn't find "nntp+"
+ score files.
+
+ * gnus-art.el (t): Define `M-^'.
+
+Mon Jan 27 15:00:11 1997 Hrvoje Niksic <hniksic@srce.hr>
+
+ * gnus-sum.el (gnus-summary-search-article): Inhibit forced
+ redisplay on XEmacs.
+
+Mon Jan 27 08:54:55 1997 Lars Magne Ingebrigtsen <larsi@menja.ifi.uio.no>
+
+ * gnus.el: Gnus v5.4.4 is released.
+
+Mon Jan 27 07:29:30 1997 Lars Magne Ingebrigtsen <larsi@ifi.uio.no>
+
+ * nnsoup.el (nnsoup-file-name): Also find AREAS.
+
+Mon Jan 27 07:09:13 1997 Joev Dubach <dubach1@husc.harvard.edu>
+
+ * message.el (message-use-followup-to): Doc fix.
+
+Mon Jan 27 06:59:14 1997 Lars Magne Ingebrigtsen <larsi@ifi.uio.no>
+
+ * gnus-art.el (gnus-article-read-summary-keys): Don't mess up when
+ using pick mode.
+
+ * gnus-undo.el (gnus-undo-mode): Set undo boundary.
+
+ * gnus-sum.el (gnus-summary-exit-hook): Doc fix.
+
+Sun Jan 26 13:20:42 1997 Lars Magne Ingebrigtsen <larsi@ifi.uio.no>
+
+ * gnus.el: Autoload gnus-add-configuration.
+
+Sun Jan 26 13:01:07 1997 Lars Magne Ingebrigtsen <larsi@menja.ifi.uio.no>
+
+ * gnus.el: Gnus v5.4.3 is released.
+
+Sun Jan 26 12:52:11 1997 Lars Magne Ingebrigtsen <larsi@menja.ifi.uio.no>
+
+ * gnus.el: Gnus v5.4.2 is released.
+
Sun Jan 26 09:28:31 1997 Per Abrahamsen <abraham@dina.kvl.dk>
* gnus-group.el: Organized customization options, and moved group
"\C-d" gnus-article-read-summary-keys
"\M-*" gnus-article-read-summary-keys
+ "\M-^" gnus-article-read-summary-keys
"\M-g" gnus-article-read-summary-keys)
(substitute-key-definition
;; Kludge to get rid of "nntp+" problems.
(goto-char (point-min))
(when (looking-at "nn[a-z]+\\+")
- (progn
- (search-forward "+")
- (forward-char -1)
- (insert "\\")))
+ (search-forward "+")
+ (forward-char -1)
+ (insert "\\")
+ (forward-char 1))
;; Kludge to deal with "++".
- (goto-char (point-min))
(while (search-forward "+" nil t)
(replace-match "\\+" t t))
;; Translate "all" to ".*".
(gnus-article-display-hook nil)
(gnus-mark-article-hook nil) ;Inhibit marking as read.
(gnus-use-article-prefetch nil)
+ (gnus-xmas-force-redisplay nil) ;Inhibit XEmacs redisplay.
(sum (current-buffer))
(found nil)
point)
:link '(custom-manual "(gnus)Various Various")
:group 'gnus)
-(defconst gnus-version-number "5.4.3"
+(defconst gnus-version-number "5.4.5"
"Version number for this version of Gnus.")
(defconst gnus-version (format "Gnus v%s" gnus-version-number)
'message-mail 'message-send-and-exit
'message-kill-buffer 'message-send-hook))
+(defvar message-delete-mh-headers t
+ "If non-nil, delete the deletable headers before feeding to mh.")
+
;;; Internal variables.
;;; Well, not really internal.
"msg."))))
(setq buffer-file-name name)
;; MH wants to generate these headers itself.
- (let ((headers message-deletable-headers))
- (while headers
- (goto-char (point-min))
- (and (re-search-forward
- (concat "^" (symbol-name (car headers)) ": *") nil t)
- (message-delete-line))
- (pop headers)))
+ (when message-delete-mh-headers
+ (let ((headers message-deletable-headers))
+ (while headers
+ (goto-char (point-min))
+ (and (re-search-forward
+ (concat "^" (symbol-name (car headers)) ": *") nil t)
+ (message-delete-line))
+ (pop headers))))
(run-hooks 'message-send-mail-hook)
;; Pass it on to mh.
(mh-send-letter)))
(defvar gnus-active-hashtb)
(defun message-expand-group ()
- (let* ((b (save-excursion (skip-chars-backward "^, :\t\n") (point)))
+ (let* ((b (save-excursion
+ (save-restriction
+ (narrow-to-region
+ (save-excursion
+ (beginning-of-line)
+ (skip-chars-forward "^:")
+ (1+ (point)))
+ (point))
+ (skip-chars-backward "^, \t\n") (point))))
(completion-ignore-case t)
(string (buffer-substring b (point)))
(hashtb (and (boundp 'gnus-active-hashtb) gnus-active-hashtb))
+Mon Jan 27 17:51:29 1997 Lars Magne Ingebrigtsen <larsi@ifi.uio.no>
+
+ * gnus.texi (Highlighting and Menus): Removed
+ `gnus-display-type'.
+
Sat Jan 25 08:09:30 1997 Lars Magne Ingebrigtsen <larsi@ifi.uio.no>
* gnus.texi (The Active File): Addition.
This is the face (i.e., font) used for mouse highlighting in Gnus. No
mouse highlights will be done if @code{gnus-visual} is @code{nil}.
-@item gnus-display-type
-@vindex gnus-display-type
-This variable is symbol indicating the display type Emacs is running
-under. The symbol should be one of @code{color}, @code{grayscale} or
-@code{mono}. If Gnus guesses this display attribute wrongly, either set
-this variable in your @file{~/.emacs} or set the resource
-@code{Emacs.displayType} in your @file{~/.Xdefaults}.
-
-@item gnus-background-mode
-@vindex gnus-background-mode
-This is a symbol indicating the Emacs background brightness. The symbol
-should be one of @code{light} or @code{dark}. If Gnus guesses this
-frame attribute wrongly, either set this variable in your @file{~/.emacs} or
-set the resource @code{Emacs.backgroundMode} in your @file{~/.Xdefaults}.
-`gnus-display-type'.
@end table
There are hooks associated with the creation of all the different menus: