/[emacs]/emacs/lisp/vc-cvs.el
ViewVC logotype

Diff of /emacs/lisp/vc-cvs.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.28 by spiegel, Fri Nov 30 13:47:39 2001 UTC revision 1.29 by pj, Thu Dec 20 18:46:37 2001 UTC
# Line 561  encoded as fractional days." Line 561  encoded as fractional days."
561    
562  (defun vc-cvs-annotate-time ()  (defun vc-cvs-annotate-time ()
563    "Return the time of the next annotation (as fraction of days)    "Return the time of the next annotation (as fraction of days)
564  systime , or NIL if there is none."  systime, or nil if there is none."
565    (let ((time-stamp    (let ((time-stamp
566           "^\\S-+\\s-+\\S-+\\s-+\\([0-9]+\\)-\\(\\sw+\\)-\\([0-9]+\\)): "))           "^\\S-+\\s-+\\S-+\\s-+\\([0-9]+\\)-\\(\\sw+\\)-\\([0-9]+\\)): "))
567      (if (looking-at time-stamp)      (if (looking-at time-stamp)

Legend:
Removed from v.1.28  
changed lines
  Added in v.1.29

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26