Gnus development mailing list
 help / color / mirror / Atom feed
From: steve@miranova.com (Steven L. Baur)
Subject: Re: Latest XEmacs lossage in sgnus 0.15
Date: 25 Nov 1995 14:30:23 -0800	[thread overview]
Message-ID: <m2ka4opbsw.fsf@diana.miranova.com> (raw)
In-Reply-To: William Perry's message of 25 Nov 1995 11:13:04 -0800

transient-mark-mode is documented to exist on XEmacs 19.13, but does
not.  I guess this makes it a documentation bug.
The fix is trivial.

--- ChangeLog~  Sat Nov 25 13:47:31 1995
+++ ChangeLog   Sat Nov 25 14:24:17 1995
@@ -1,5 +1,10 @@
 Sat Nov 25 13:41:08 1995  Steven L. Baur  <steve@diana.miranova.com (Steven L. Baur)>
 
+       * gnus.el (gnus-group-process-prefix): transient-mark-mode
+       doesn't exist on XEmacs.
+
+       * gnus.el (gnus-summary-work-articles): ditto.
+
        * gnus.el (gnus-mouse-face-function): One comma too many on
        gnus-mouse-face-prop

--- gnus.el~    Sat Nov 25 13:30:29 1995
+++ gnus.el     Sat Nov 25 14:08:05 1995
@@ -4496,7 +4496,7 @@
          (setq n (1- n))
          (gnus-group-next-group way)))
       (nreverse groups)))
-   ((and transient-mark-mode
+   ((and (fboundp 'transient-mark-mode) transient-mark-mode
         mark-active)
     ;; Work on the region between point and mark.
     (let ((max (max (point) (mark)))
@@ -8408,7 +8408,7 @@
                   (gnus-summary-find-next nil article)))
          (decf n)))
       (nreverse articles)))
-   ((and transient-mark-mode
+   ((and (fboundp 'transient-mark-mode) transient-mark-mode
         mark-active)
     ;; Work on the region between point and mark.
     (let ((max (max (point) (mark)))

-- 
steve@miranova.com baur


  parent reply	other threads:[~1995-11-25 22:30 UTC|newest]

Thread overview: 6+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1995-11-25 19:13 William Perry
1995-11-25 21:55 ` Steven L. Baur
1995-11-25 22:30 ` Steven L. Baur [this message]
1995-11-26  0:30   ` William Perry
1995-11-26  1:45   ` Jens Lautenbacher
1995-11-26  4:12     ` Steven L. Baur

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=m2ka4opbsw.fsf@diana.miranova.com \
    --to=steve@miranova.com \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).