Gnus development mailing list
 help / color / mirror / Atom feed
From: steve@miranova.com (Steven L. Baur)
Subject: Re: [sgnus 0.13] bug: gnus-server-enter-setup-buffer
Date: 18 Nov 1995 18:28:51 -0800	[thread overview]
Message-ID: <m2zqdt9w2k.fsf@diana.miranova.com> (raw)
In-Reply-To: Michael Cook's message of 18 Nov 1995 16:05:29 -0800

>>>>> "Michael" == Michael Cook <mcook@cognex.com> writes:

    Michael> Sgnus specifies that `gnus-server-enter-setup-buffer' can
    Michael> be autoloaded from `gnus-srvr.el'.  In fact, the
    Michael> `gnus-server-enter-setup-buffer' function is not defined
    Michael> in `gnus-srvr.el' (or in any file of the distribution).

    Michael> Michael.

Server mode looks pretty broken.  The function named
gnus-server-enter-server-buffer is almost certainly the one you're
attempting to reference.  gnus-server-pick-server (middle mouse button
binding) also suffers from a typo.  The highlighting code bombs too.
Once I got all that repaired, nearly nothing worked.  I suspect this
is like the NoCEM code, not ready for real use yet.

The following patch is a start only.  You probably also need to have
installed the mouse highlight patch I just sent to the list.

--- gnus-srvr.el.orig	Thu Nov 16 19:36:20 1995
+++ gnus-srvr.el	Sat Nov 18 17:50:57 1995
@@ -123,10 +123,10 @@
     (beginning-of-line)
     (setq b (point))
     ;; Insert the text.
-    (insert (eval sformat))
+    (eval sformat)
     (add-text-properties b (1+ b) (list 'gnus-server (intern name)))))
 
-(defun gnus-server-enter-server-buffer ()
+(defun gnus-server-enter-setup-buffer ()
   "Set up the server buffer."
   (gnus-server-setup-buffer)
   (gnus-configure-windows 'server)
@@ -146,7 +146,7 @@
 			   gnus-server-mode-line-format-alist))
   (setq gnus-server-line-format-spec 
 	(gnus-parse-format gnus-server-line-format 
-			   gnus-server-line-format-alist))
+			   gnus-server-line-format-alist t))
   (let ((alist gnus-server-alist)
 	(buffer-read-only nil)
 	(opened gnus-opened-servers)
@@ -389,7 +389,7 @@
   (interactive (list (gnus-server-server-name)))
   (gnus-browse-foreign-server (gnus-server-to-method server) (current-buffer)))
 
-(defun gnus-mouse-pick-server (e)
+(defun gnus-server-pick-server (e)
   (interactive "e")
   (mouse-set-point e)
   (gnus-server-read-server (gnus-server-server-name)))

-- 
steve@miranova.com baur


      reply	other threads:[~1995-11-19  2:28 UTC|newest]

Thread overview: 4+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1995-11-17  3:37 September Gnus 0.14 is released Lars Magne Ingebrigtsen
1995-11-17 17:56 ` [sgnus-0.13] (autoload 'gnus-summary-save-in-folder "gnus-mh.el") Michael Cook
1995-11-19  0:05 ` [sgnus 0.13] bug: gnus-server-enter-setup-buffer Michael Cook
1995-11-19  2:28   ` Steven L. Baur [this message]

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=m2zqdt9w2k.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).