*** empty log message ***

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b7e91d9..3ed8f55 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,13 @@
+Mon Aug 28 05:09:47 1995  Lars Magne Ingebrigtsen  <lingebri@sunsci4.cern.ch>
+
+       * gnus-vis.el (gnus-summary-make-menu-bar): Date menu was odd.
+
+       * custom.el: Choked under non-X Emacs.
+
 Sun Aug 27 05:05:05 1995  Lars Magne Ingebrigtsen  <lingebri@sunsci4.cern.ch>
 
+       * gnus.el: 0.99.24 is released.
+
        * nnvirtual.el (nnvirtual-create-mapping): Numbering
        irregularities - would be off by 1 for each of some component
        groups.

diff --git a/lisp/custom.el b/lisp/custom.el
index f77e205..9c0bfd0 100644 (file)
--- a/lisp/custom.el
+++ b/lisp/custom.el
@@ -134,8 +134,10 @@ STRING should be given if the last search was by `string-match' on STRING."
   ;; Must avoid calling set-face-underline-p directly, because it
   ;; is a defsubst in emacs19, and will make the .elc files non
   ;; portable!
-  (or (face-differs-from-default-p 'underline)
-      (funcall 'set-face-underline-p 'underline t)))
+  (or (and (fboundp 'face-differs-from-default-p)
+          (face-differs-from-default-p 'underline))
+      (and (fboundp 'set-face-underline-p)
+          (funcall 'set-face-underline-p 'underline t))))
 
 (or (fboundp 'set-text-properties)
     ;; Missing in XEmacs 19.12.

diff --git a/lisp/gnus-vis.el b/lisp/gnus-vis.el
index e396831..28c8327 100644 (file)
--- a/lisp/gnus-vis.el
+++ b/lisp/gnus-vis.el
@@ -610,8 +610,8 @@ variable it the real callback function.")
         ["Citation" gnus-article-highlight-citation t])
        ("Date"
         ["Local" gnus-article-date-local t]
-        ["UT" gnus-article-date-local t]
-        ["Lapsed" gnus-article-date-local t])
+        ["UT" gnus-article-date-ut t]
+        ["Lapsed" gnus-article-date-lapsed t])
        ("Filter"
         ["Overstrike" gnus-article-treat-overstrike t]
         ["Word wrap" gnus-article-word-wrap t]

diff --git a/lisp/gnus.el b/lisp/gnus.el
index bdb1ee5..f78aa62 100644 (file)
--- a/lisp/gnus.el
+++ b/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.24"
+(defconst gnus-version "(ding) Gnus v0.99.25"
   "Version number for this version of Gnus.")
 
 (defvar gnus-info-nodes

diff --git a/lisp/nntp.el b/lisp/nntp.el
index 4e1b806..7d1757f 100644 (file)
--- a/lisp/nntp.el
+++ b/lisp/nntp.el
@@ -230,7 +230,7 @@ instead call function `nntp-status-message' to get status message.")
          (if (or (null sequence)       ;All requests have been sent.
                  (zerop (% count nntp-maximum-request)))
              (progn
-               (accept-process-output)
+               (nntp-accept-response)
                (while (progn
                         (goto-char last-point)
                         ;; Count replies.
@@ -292,7 +292,7 @@ instead call function `nntp-status-message' to get status message.")
          (if (or (null groups)       ;All requests have been sent.
                  (zerop (% count nntp-maximum-request)))
              (progn
-               (accept-process-output)
+               (nntp-accept-response)
                (while (progn
                         (goto-char last-point)
                         ;; Count replies.
@@ -926,7 +926,7 @@ It will prompt for a password."
                             (setq received (1+ received)))
                           (setq last-point (point))
                           (< received count))
-                   (nntp-accept-response))))))
+                   (accept-process-output))))))
 
       (if (not nntp-server-xover)
          ()
@@ -1014,7 +1014,7 @@ It will prompt for a password."
          (process-send-region nntp-server-process (point) last)
          ;; I don't know whether the next codes solve the known
          ;;  problem of communication error of GNU Emacs.
-         (accept-process-output)
+         (nntp-accept-response)
          ;;(sit-for 0)
          (goto-char last))))
     ;; We cannot erase buffer, because reply may be received.