[gnu.emacs] IRC-mode v 1.2.1

tale@PAWL.RPI.EDU (David C Lawrence) (08/02/89)

Sigh.  I knew this would happen.  In cleaning up some places I made a
typo which the byte-compiler politely pointed out for me.  Well,
here's a very small patch for it.  It actually only fixes one line.
Sorry about this, folks.

Dave
-- 
 (setq mail '("tale@pawl.rpi.edu" "tale@itsgw.rpi.edu" "tale@rpitsmts.bitnet"))

*** irc.el	Wed Aug  2 08:31:47 1989
--- /home/h/tale/emacs/irc.el	Wed Aug  2 09:34:38 1989
***************
*** 3,10 ****
  ;; Author          : David C Lawrence           <tale@pawl.rpi.edu>
  ;; Created On      : Wed Jun 14 22:22:57 1989
  ;; Last Modified By: David C Lawrence
! ;; Last Modified On: Wed Aug  2 08:30:39 1989
! ;; Update Count    : 2
  ;; Status          : Seemingly stable.
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;  Copyright (C) 1989  David C Lawrence
--- 3,10 ----
  ;; Author          : David C Lawrence           <tale@pawl.rpi.edu>
  ;; Created On      : Wed Jun 14 22:22:57 1989
  ;; Last Modified By: David C Lawrence
! ;; Last Modified On: Wed Aug  2 09:32:29 1989
! ;; Update Count    : 3
  ;; Status          : Seemingly stable.
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;  Copyright (C) 1989  David C Lawrence
***************
*** 29,34 ****
--- 29,38 ----
  ;;     Troy NY 12180          Generally available on IRC as "tale"
  
  ;; History 		
+ ;; 2-Aug-1989		David C Lawrence	(tale at life.pawl.rpi.edu)
+ ;;    Last Modified: Wed Aug  2 09:25:39 1989 #3
+ ;;    * Fixed a really stupid brain slip in irc-execute-confirm
+ 
  ;; 2-Aug-1989		David C Lawrence	(tale at imagine.pawl.rpi.edu)
  ;;    Last Modified: Wed Aug  2 08:18:37 1989 #2
  ;;    * Fixed a minor bug in splitting lines that have an implicit sendlist.
***************
*** 236,242 ****
  It is kept as a separate list so that regular users won't wonder how
  come the commands don't work for them.")
  
! (defconst irc-version "IRC-mode Version 1.2"
    "The currently loaded version of irc-mode")
  
  ;; keymap
--- 240,246 ----
  It is kept as a separate list so that regular users won't wonder how
  come the commands don't work for them.")
  
! (defconst irc-version "IRC-mode Version 1.2.1"
    "The currently loaded version of irc-mode")
  
  ;; keymap
***************
*** 1709,1715 ****
    (interactive "sSet confimation on (+) or off (-)? ")
    ;; grab the first arg
    (string-match "^\\s *\\(\\S *\\).*$" str)
!   (setq str (match-beginning 1) (match-end 1))
    (cond ((string= str "+") (setq irc-confirm t))
          ((string= str "-") (setq irc-confirm nil)))
    (irc-insert "Message confirmation is %s." (if irc-confirm "on" "off")))
--- 1713,1719 ----
    (interactive "sSet confimation on (+) or off (-)? ")
    ;; grab the first arg
    (string-match "^\\s *\\(\\S *\\).*$" str)
!   (setq str (substring str (match-beginning 1) (match-end 1)))
    (cond ((string= str "+") (setq irc-confirm t))
          ((string= str "-") (setq irc-confirm nil)))
    (irc-insert "Message confirmation is %s." (if irc-confirm "on" "off")))
***************
*** 2338,2344 ****
    (save-excursion
      (set-buffer (get-buffer-create "*IRC-mode News*"))
      (erase-buffer)
!     (insert "Latest changes to Irc mode:
  
  For functions, use C-h f to describe the function.  Variables use C-h v.
  
--- 2342,2348 ----
    (save-excursion
      (set-buffer (get-buffer-create "*IRC-mode News*"))
      (erase-buffer)
!     (insert "Latest changes to IRC mode:
  
  For functions, use C-h f to describe the function.  Variables use C-h v.