unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
From: Daniel Brockman <daniel@brockman.se>
Subject: patch: bugfixes in rcirc.el (rcirc-default-user-full-name, rcirc-process-list)
Date: Wed, 31 May 2006 07:56:00 +0200	[thread overview]
Message-ID: <87d5du20wf.fsf@wigwam.brockman.se> (raw)

[-- Attachment #1: Type: text/plain, Size: 328 bytes --]

Here are a couple of tiny bugfixes for rcirc.

2006-05-31  Daniel Brockman  <daniel@brockman.se>

	* net/rcirc.el (rcirc-default-user-full-name): Default to
	`rcirc-default-user-name' instead of `rcirc-user-name' (which no
	longer exists).
	(rcirc-process-list): Check `buffer-live-p' before attempting to
	switch to a buffer.


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Type: text/x-patch, Size: 1361 bytes --]

Index: rcirc.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/net/rcirc.el,v
retrieving revision 1.22
diff -c -r1.22 rcirc.el
*** rcirc.el	26 Apr 2006 03:09:31 -0000	1.22
--- rcirc.el	31 May 2006 05:36:35 -0000
***************
*** 74,80 ****
    :group 'rcirc)
  
  (defcustom rcirc-default-user-full-name (if (string= (user-full-name) "")
! 					    rcirc-user-name
  					  (user-full-name))
    "The full name sent to the server when connecting."
    :type 'string
--- 74,80 ----
    :group 'rcirc)
  
  (defcustom rcirc-default-user-full-name (if (string= (user-full-name) "")
! 					    rcirc-default-user-name
  					  (user-full-name))
    "The full name sent to the server when connecting."
    :type 'string
***************
*** 469,475 ****
    "Return a list of rcirc processes."
    (let (ps)
      (mapc (lambda (p)
!             (when (process-buffer p)
                (with-rcirc-process-buffer p
                  (when (eq major-mode 'rcirc-mode)
                    (setq ps (cons p ps))))))
--- 469,475 ----
    "Return a list of rcirc processes."
    (let (ps)
      (mapc (lambda (p)
!             (when (buffer-live-p (process-buffer p))
                (with-rcirc-process-buffer p
                  (when (eq major-mode 'rcirc-mode)
                    (setq ps (cons p ps))))))

[-- Attachment #3: Type: text/plain, Size: 206 bytes --]


-- 
Daniel Brockman <daniel@brockman.se>

   ``For any given feature, I don't care much about the
     people who find it useless --- I care more about
     the people who find it useful.'' --- Larry Wall

[-- Attachment #4: Type: text/plain, Size: 142 bytes --]

_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel

                 reply	other threads:[~2006-05-31  5:56 UTC|newest]

Thread overview: [no followups] expand[flat|nested]  mbox.gz  Atom feed

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

  List information: https://www.gnu.org/software/emacs/

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

  git send-email \
    --in-reply-to=87d5du20wf.fsf@wigwam.brockman.se \
    --to=daniel@brockman.se \
    /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.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

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 read-only IMAP folder(s) and NNTP newsgroup(s).