From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: David Rogoff Newsgroups: gmane.emacs.help Subject: Re: Insert date and Time Date: Thu, 25 Feb 2010 11:20:29 -0800 Organization: Newshosting.com - Highest quality at a great price! www.newshosting.com Message-ID: <4b86cd7c$0$30386$c32e2966@unlimited.newshosting.com> References: <877hq1e5dx.fsf@galatea.lan.informatimago.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1; format=flowed Content-Transfer-Encoding: 8bit X-Trace: dough.gmane.org 1267126856 27263 80.91.229.12 (25 Feb 2010 19:40:56 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Thu, 25 Feb 2010 19:40:56 +0000 (UTC) To: help-gnu-emacs@gnu.org Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Thu Feb 25 20:40:51 2010 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1NkjZp-00017T-GV for geh-help-gnu-emacs@m.gmane.org; Thu, 25 Feb 2010 20:40:49 +0100 Original-Received: from localhost ([127.0.0.1]:54354 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NkjZo-0002PN-TX for geh-help-gnu-emacs@m.gmane.org; Thu, 25 Feb 2010 14:40:48 -0500 Original-Path: news.stanford.edu!usenet.stanford.edu!news.glorb.com!news2.glorb.com!news.glorb.com!npeer03.iad.highwinds-media.com!news.highwinds-media.com!feed-me.highwinds-media.com!post02.iad!not-for-mail Original-Newsgroups: gnu.emacs.help Original-X-Complaints-To: abuse(at)newshosting.com User-Agent: Unison/2.0.4 Original-Lines: 64 Original-Xref: news.stanford.edu gnu.emacs.help:177100 X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:72138 Archived-At: On 2010-02-25 06:50:34 -0800, Pascal J. Bourguignon said: > Tugello writes: > >> Hello, >> good morning to all,I'm newbie with emacs >> my question is about how to insert current date and time, using a short key >> combination instead to write they completely . >> someone ave any suggestion ? >> thanks in advance > > I type: C-u M-! date RET > > A purely emacs lisp alternative would be: > M-: (insert (current-time-string)) RET > > > Of course, if you have to do it often, you can do: > > (defun insert-timestamp () > (interactive) > (insert (current-time-string))) > > (global-set-key (kbd "") 'insert-timestamp) > > so that you only have to type F8 to insert the timestamp. Here's a couple of versions I use with some formatting and chioce of just date or date and time: (defun insert-date () "Insert current date at point, and newline if point is at beginning of line." (interactive) (if (prog1 (bolp) (let ((time (current-time-string))) (insert (substring time 4 11) (substring time 20 24))) ) ;; insert newline if point was at beginning of line (insert ?\n)) ) ;; output looks like this: Feb 25 2010 ;; (global-set-key '[(meta f12)] 'insert-date) (defun insert-date-and-time () "Insert current date and time at point, and newline if point is at beginning of line." (interactive) (if (prog1 (bolp) (let ((time (current-time-string))) (insert (substring time 4 11) (substring time 20 24) (substring time 10 19) ) ) ) ;; insert newline if point was at beginning of line (insert ?\n)) ) (global-set-key '[A-home] 'insert-date-and-time) ;; output looks like this: Feb 25 2010 11:05:43