headers
Glenn Morris | 1 Apr 2007 01:22
Picon

Changes to emacs/lisp/ChangeLog,v

CVSROOT:	/sources/emacs
Module name:	emacs
Changes by:	Glenn Morris <gm>	07/03/31 23:22:20

Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.10904
retrieving revision 1.10905
diff -u -b -r1.10904 -r1.10905
--- ChangeLog	31 Mar 2007 19:41:29 -0000	1.10904
+++ ChangeLog	31 Mar 2007 23:22:19 -0000	1.10905
 <at>  <at>  -1,5 +1,7  <at>  <at> 
 2007-03-31  Glenn Morris  <rgm <at> gnu.org>

+	* emacs-lisp/timer.el (run-at-time): Doc fix.
+
 	* emacs-lisp/warnings.el (display-warning): If we create the
 	buffer displaying the warning, disable undo there.
Permalink | Reply | 0 comments |
headers
Glenn Morris | 1 Apr 2007 01:22
Picon

Changes to emacs/lisp/emacs-lisp/timer.el,v

CVSROOT:	/sources/emacs
Module name:	emacs
Changes by:	Glenn Morris <gm>	07/03/31 23:22:35

Index: timer.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emacs-lisp/timer.el,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -b -r1.17 -r1.18
--- timer.el	21 Jan 2007 02:44:24 -0000	1.17
+++ timer.el	31 Mar 2007 23:22:35 -0000	1.18
 <at>  <at>  -360,11 +360,16  <at>  <at> 
 (defun run-at-time (time repeat function &rest args)
   "Perform an action at time TIME.
 Repeat the action every REPEAT seconds, if REPEAT is non-nil.
-TIME should be a string like \"11:23pm\", nil meaning now, a number of seconds
-from now, a value from `current-time', or t (with non-nil REPEAT)
-meaning the next integral multiple of REPEAT.
-REPEAT may be an integer or floating point number.
-The action is to call FUNCTION with arguments ARGS.
+TIME should be one of: a string giving an absolute time like
+\"11:23pm\" (the acceptable formats are those recognized by
+`diary-entry-time'; note that such times are interpreted as times
+today, even if in the past); a string giving a relative time like
+\"2 hours 35 minutes\" (the acceptable formats are those
+recognized by `timer-duration'); nil meaning now; a number of
+seconds from now; a value from `encode-time'; or t (with non-nil
+REPEAT) meaning the next integral multiple of REPEAT.  REPEAT may
+be an integer or floating point number.  The action is to call
(Continue reading)

Permalink | Reply | 0 comments |
headers
Glenn Morris | 1 Apr 2007 01:29
Picon

Changes to emacs/lispref/ChangeLog,v

CVSROOT:	/sources/emacs
Module name:	emacs
Changes by:	Glenn Morris <gm>	07/03/31 23:29:29

Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lispref/ChangeLog,v
retrieving revision 1.835
retrieving revision 1.836
diff -u -b -r1.835 -r1.836
--- ChangeLog	31 Mar 2007 20:02:56 -0000	1.835
+++ ChangeLog	31 Mar 2007 23:29:29 -0000	1.836
 <at>  <at>  -1,3 +1,7  <at>  <at> 
+2007-03-31  Glenn Morris  <rgm <at> gnu.org>
+
+	* os.texi (Timers): Fix description of run-at-time TIME formats.
+
 2007-03-31  Richard Stallman  <rms <at> gnu.org>

 	* display.texi (Invisible Text): Correct buffer-invisibility-spec
Permalink | Reply | 0 comments |
headers
Glenn Morris | 1 Apr 2007 01:29
Picon

Changes to emacs/lispref/os.texi,v

CVSROOT:	/sources/emacs
Module name:	emacs
Changes by:	Glenn Morris <gm>	07/03/31 23:29:38

Index: os.texi
===================================================================
RCS file: /sources/emacs/emacs/lispref/os.texi,v
retrieving revision 1.104
retrieving revision 1.105
diff -u -b -r1.104 -r1.105
--- os.texi	31 Mar 2007 17:27:34 -0000	1.104
+++ os.texi	31 Mar 2007 23:29:38 -0000	1.105
 <at>  <at>  -1421,20 +1421,12  <at>  <at> 

  <at> var{time} may specify an absolute or a relative time.

-Absolute times may be specified in a wide variety of formats; this
-function tries to accept all the commonly used date formats.  The most
-convenient formats are strings.  Valid such formats include these two,
-
- <at> example
- <at> var{year}- <at> var{month}- <at> var{day}  <at> var{hour}: <at> var{min}: <at> var{sec}  <at> var{timezone}
-
- <at> var{hour}: <at> var{min}: <at> var{sec}  <at> var{timezone}  <at> var{month}/ <at> var{day}/ <at> var{year}
- <at> end example
-
- <at> noindent
-where in both examples all fields are numbers; the format that
- <at> code{current-time-string} returns is also allowed, and many others
-as well.
(Continue reading)

Permalink | Reply | 0 comments |
headers
Richard M. Stallman | 1 Apr 2007 09:44
Picon
Picon

Changes to emacs/admin/FOR-RELEASE,v

CVSROOT:	/cvsroot/emacs
Module name:	emacs
Changes by:	Richard M. Stallman <rms>	07/04/01 07:44:57

Index: FOR-RELEASE
===================================================================
RCS file: /cvsroot/emacs/emacs/admin/FOR-RELEASE,v
retrieving revision 1.593
retrieving revision 1.594
diff -u -b -r1.593 -r1.594
--- FOR-RELEASE	31 Mar 2007 20:41:32 -0000	1.593
+++ FOR-RELEASE	1 Apr 2007 07:44:57 -0000	1.594
 <at>  <at>  -45,13 +45,12  <at>  <at> 

 ** Kevin Rodgers missing assignment

-** flyspell and check-comments
-<http://lists.gnu.org/archive/html/emacs-devel/2007-03/msg00400.html>
-
 ** where-is-internal bug

 ** yazicivo <at> ttnet.net.tr, Mar 28: Locale Dependent Downcasing in smtpmail

+** dooglus <at> gmail.com, Mar 31: narrowing *shell* buffer causes odd error
+
 * DOCUMENTATION

 ** Check the Emacs Tutorial.
Permalink | Reply | 0 comments |
headers
Miles Bader | 1 Apr 2007 15:36
Picon
Gravatar

Changes to emacs/lisp/erc/erc-notify.el,v

CVSROOT:	/cvsroot/emacs
Module name:	emacs
Changes by:	Miles Bader <miles>	07/04/01 13:36:38

Index: lisp/erc/erc-notify.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/erc/erc-notify.el,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- lisp/erc/erc-notify.el	21 Jan 2007 02:47:36 -0000	1.4
+++ lisp/erc/erc-notify.el	1 Apr 2007 13:36:37 -0000	1.5
 <at>  <at>  -121,8 +121,7  <at>  <at> 
 	     (ison-list (delete "" (split-string
 				    (erc-response.contents parsed))))
 	     (new-list ison-list)
-	     (old-list (with-current-buffer (erc-server-buffer)
-			 erc-last-ison)))
+	     (old-list (erc-with-server-buffer erc-last-ison)))
 	(while new-list
 	  (when (not (erc-member-ignore-case (car new-list) old-list))
 	    (run-hook-with-args 'erc-notify-signon-hook server (car new-list))
 <at>  <at>  -204,7 +203,7  <at>  <at> 
   (cond
    ((null args)
     ;; Print current notificated people (online)
-    (let ((ison (with-current-buffer (erc-server-buffer) erc-last-ison)))
+    (let ((ison (erc-with-server-buffer erc-last-ison)))
       (if (not ison)
 	  (erc-display-message
(Continue reading)

Permalink | Reply | 0 comments |
headers
Miles Bader | 1 Apr 2007 15:36
Picon
Gravatar

Changes to emacs/lisp/erc/erc-match.el,v

CVSROOT:	/cvsroot/emacs
Module name:	emacs
Changes by:	Miles Bader <miles>	07/04/01 13:36:38

Index: lisp/erc/erc-match.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/erc/erc-match.el,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- lisp/erc/erc-match.el	21 Jan 2007 02:47:36 -0000	1.6
+++ lisp/erc/erc-match.el	1 Apr 2007 13:36:37 -0000	1.7
 <at>  <at>  -1,6 +1,7  <at>  <at> 
 ;;; erc-match.el --- Highlight messages matching certain regexps

-;; Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007 Free Software Foundation, Inc.
+;; Copyright (C) 2002, 2003, 2004, 2005, 2006,
+;;   2007 Free Software Foundation, Inc.

 ;; Author: Andreas Fuchs <asf <at> void.at>
 ;; Keywords: comm, faces
 <at>  <at>  -540,7 +541,7  <at>  <at> 
     (when (and
 	   (or (eq erc-log-matches-flag t)
 	       (and (eq erc-log-matches-flag 'away)
-		    erc-away))
+		    (erc-away-time)))
 	   match-buffer-name)
       (let ((line (format-spec erc-log-match-format
 		   (format-spec-make
(Continue reading)

Permalink | Reply | 0 comments |
headers
Miles Bader | 1 Apr 2007 15:36
Picon
Gravatar

Changes to emacs/lisp/erc/erc-autoaway.el,v

CVSROOT:	/cvsroot/emacs
Module name:	emacs
Changes by:	Miles Bader <miles>	07/04/01 13:36:38

Index: lisp/erc/erc-autoaway.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/erc/erc-autoaway.el,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- lisp/erc/erc-autoaway.el	21 Jan 2007 02:47:36 -0000	1.6
+++ lisp/erc/erc-autoaway.el	1 Apr 2007 13:36:37 -0000	1.7
 <at>  <at>  -40,6 +40,49  <at>  <at> 
   "The Emacs idletimer.
 This is only used when `erc-autoaway-idle-method' is set to 'emacs.")

+(defvar erc-autoaway-last-sent-time (erc-current-time)
+  "The last time the user sent something.")
+
+(defvar erc-autoaway-caused-away nil
+  "Indicates whether this module was responsible for setting the
+user's away status.")
+
+(eval-when-compile (defvar erc-autoaway-idle-seconds))
+
+(defun erc-autoaway-reestablish-idletimer ()
+  "Reestablish the Emacs idletimer.
+If `erc-autoaway-idle-method' is 'emacs, you must call this
+function each time you change `erc-autoaway-idle-seconds'."
+  (interactive)
(Continue reading)

Permalink | Reply | 0 comments |
headers
Miles Bader | 1 Apr 2007 15:36
Picon
Gravatar

Changes to emacs/lisp/erc/erc-fill.el,v

CVSROOT:	/cvsroot/emacs
Module name:	emacs
Changes by:	Miles Bader <miles>	07/04/01 13:36:38

Index: lisp/erc/erc-fill.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/erc/erc-fill.el,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- lisp/erc/erc-fill.el	21 Jan 2007 02:47:36 -0000	1.4
+++ lisp/erc/erc-fill.el	1 Apr 2007 13:36:37 -0000	1.5
 <at>  <at>  -1,6 +1,7  <at>  <at> 
 ;;; erc-fill.el --- Filling IRC messages in various ways

-;; Copyright (C) 2001, 2002, 2003, 2004, 2006, 2007 Free Software Foundation, Inc.
+;; Copyright (C) 2001, 2002, 2003, 2004, 2006,
+;;   2007 Free Software Foundation, Inc.

 ;; Author: Andreas Fuchs <asf <at> void.at>
 ;;         Mario Lang <mlang <at> delysid.org>
 <at>  <at>  -187,14 +188,6  <at>  <at> 
       (length (format-time-string erc-timestamp-format))
     0))

-(defun erc-restore-text-properties ()
-  "Restore the property 'erc-parsed for the region."
-  (let* ((parsed-posn (text-property-not-all (point-min) (point-max)
-                                             'erc-parsed nil))
-         (parsed-prop (when parsed-posn
(Continue reading)

Permalink | Reply | 0 comments |
headers
Miles Bader | 1 Apr 2007 15:36
Picon
Gravatar

Changes to emacs/lisp/erc/erc-stamp.el,v

CVSROOT:	/cvsroot/emacs
Module name:	emacs
Changes by:	Miles Bader <miles>	07/04/01 13:36:38

Index: lisp/erc/erc-stamp.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/erc/erc-stamp.el,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -b -r1.8 -r1.9
--- lisp/erc/erc-stamp.el	21 Jan 2007 02:47:36 -0000	1.8
+++ lisp/erc/erc-stamp.el	1 Apr 2007 13:36:37 -0000	1.9
 <at>  <at>  -147,7 +147,7  <at>  <at> 
 	(error "Timestamp function unbound"))
       (when (and (fboundp erc-insert-away-timestamp-function)
 		 erc-away-timestamp-format
-		 (with-current-buffer (erc-server-buffer) erc-away)
+		 (erc-away-time)
 		 (not erc-timestamp-format))
 	(funcall erc-insert-away-timestamp-function
 		 (erc-format-timestamp ct erc-away-timestamp-format)))
 <at>  <at>  -203,6 +203,7  <at>  <at> 
 	 (s (if ignore-p (make-string len ? ) string)))
     (unless ignore-p (setq erc-timestamp-last-inserted string))
     (erc-put-text-property 0 len 'field 'erc-timestamp s)
+    (erc-put-text-property 0 len 'invisible 'timestamp s)
     (insert s)))

 (defun erc-insert-aligned (string pos)
 <at>  <at>  -319,6 +320,21  <at>  <at>
(Continue reading)

Permalink | Reply | 0 comments |

Gmane