[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: automatic time-stamp

From: Tim X
Subject: Re: automatic time-stamp
Date: Wed, 04 May 2005 18:19:06 +1000
User-agent: Gnus/5.1007 (Gnus v5.10.7) Emacs/21.4 (gnu/linux)

"Jeffrey L. Greer" <address@hidden> writes:

> I am trying to configure automatic time-stamp for emacs 21 in a Debian
> Sarge system. I have the following .emacs file in my home directory. I
> have read and re-read what seems to be the relevant pages in the hard
> copy of Gnu Emacs Manual. Time stamp will only work manually.
> Suggestions please? Thank you, Jeff Greer

I use the time-stamp command to insert a created time and last
modified time via a 'tempo' skeleton template I have. This works really well -
when I insert the skeleton I get this

>       Filename: /home/tcross/News/drafts/drafts/2
>  Creation Date: Wednesday, 04 May 2005 06:13 PM EST
>  Last Modified: 
>            Job: 
>         Author: Tim Cross <address@hidden>
>    Description: 

The Last Modified field is updated each time I save the file. The
relevant time-stamp stuff from my .emacs is

(add-hook 'write-file-hooks 'time-stamp)
(setq time-stamp-active t)
(setq time-stamp-format "%:a, %02d %:b %:y %02I:%02M %#P %Z")
(setq time-stamp-start "\\(Time-stamp:[         ]+\\\\?[\"<]+\\|Last Modified:[ 
(setq time-stamp-end "\\\\?[\">]\\|$")
(setq time-stamp-line-limit 10)

The template is

(tempo-define-template "generic-header"
                                           '((format "%s" comment-start) 
                                                 "      Filename: " 
(buffer-file-name) '> 'n
                                                 (format "%s" comment-start) " 
Creation Date: "
                                                 (format-time-string "%A, %d %B 
%Y %I:%M %p %Z") '> 'n
                                                 (format "%s" comment-start) " 
Last Modified: " '> 'n
                                                 (format "%s" comment-start) 
                                                 "           Job: " (p "Job: ") 
'> 'n
                                                 (format "%s" comment-start) 
                                                 "        Author: Tim Cross 
                                                 '> 'n
                                                 (format "%s" comment-start) "  
 Description:" '> 'n
                                                 (format "%s" comment-start) '> 


Tim Cross
The e-mail address on this message is FALSE (obviously!). My real e-mail is
to a company in Australia called rapttech and my login is tcross - if you 
really need to send mail, you should be able to work it out!

reply via email to

[Prev in Thread] Current Thread [Next in Thread]