inserting date and time at the cursor location

inserting date and time at the cursor location

[Guy-Armand Kamendje]

Hi,
Is there a way to let xemacs insert the current date and time at the actual
cursor location?
Thanks for any hint
Guy

Re: inserting date and time at the cursor location

[Jesper Harder]

"Guy-Armand Kamendje" <kguy@gmx.at> writes:

> Is there a way to let xemacs insert the current date and time at the
> actual cursor location?

(defun jh-insert-current-time ()
  (interactive)
  (insert (current-time-string)))

Then do `M-x jh-insert-current-time' or bind it to some key sequence.

Re: inserting date and time at the cursor location

[David Kastrup]

Jesper Harder <harder@myrealbox.com> writes:

> "Guy-Armand Kamendje" <kguy@gmx.at> writes:
> 
> > Is there a way to let xemacs insert the current date and time at the
> > actual cursor location?
> 
> (defun jh-insert-current-time ()
>   (interactive)
>   (insert (current-time-string)))
> 
> Then do `M-x jh-insert-current-time' or bind it to some key sequence.

You could also use
C-u M-! date RET

-- 
David Kastrup, Kriemhildstr. 15, 44793 Bochum
Email: David.Kastrup@t-online.de

Re: inserting date and time at the cursor location

[kgold]

I don't know about xemacs, but here's the function I use in emacs:

(defun insert-date ()
  "Insert date at the current cursor position in the current buffer."
  (interactive)
  (insert (format-time-string "%d %B %Y ")))

Bonus 1:

I bind it to a key like this:

(define-key esc-map "D" 'insert-date)

Bonus 2:

If you want a time stamp updated automatically every time you write:

; time stamp (Time-stamp: " " in first eight lines of file)

(add-hook 'write-file-hooks 'time-stamp)
(setq time-stamp-active t)
(setq time-stamp-format "%02d %:b %:y %02H:%02M:%02S")

"Guy-Armand Kamendje" <kguy@gmx.at> writes:
> 
> Is there a way to let xemacs insert the current date and time at the actual
> cursor location?

-- 
-- 
Ken Goldman   kgold@watson.ibm.com   914-784-7646

Re: inserting date and time at the cursor location

[Clemens Fischer]

David Kastrup <David.Kastrup@t-online.de> writes:

> You could also use
> C-u M-! date RET

ok, how do i bind this to a key?

clemens

Re: inserting date and time at the cursor location

[ftrw]

Clemens Fischer <ino@despammed.com> writes:

> David Kastrup <David.Kastrup@t-online.de> writes:
> 
> > You could also use
> > C-u M-! date RET
> 
> ok, how do i bind this to a key?
> 
> clemens

C-x (                                    (define macro)
C-u M-! date RET                         (your macro)
C-x )                                    (end macro)
M-x name-last-kbd-macro RET insert-date  (name macro)
C-x C-f ~/.emacs
M-x insert-kbd-macro RET insert-date     (insert macro into .emacs)

Now add this line underneath your new macro (choose
whatever key you want to bind it to):

(global-set-key [M-f4] 'insert-date)

Re: inserting date and time at the cursor location

[Reiner Steib]

On Thu, Oct 03 2002, Clemens Fischer wrote:

> David Kastrup <David.Kastrup@t-online.de> writes:
>
>> You could also use
>> C-u M-! date RET
>
> ok, how do i bind this to a key?

(1) Find out the function called by `M-!' using `C-h k' ...

,----[ C-h k M-! ]
| M-! runs the command shell-command
|    which is an interactive compiled Lisp function in `simple'.
| (shell-command COMMAND &optional OUTPUT-BUFFER ERROR-BUFFER)
| 
| Execute string COMMAND in inferior shell; display output, if any.
| With prefix argument, insert the COMMAND's output at point.
`----

(2) Read the doc-string, especially about the prefix argument in this
    case (C-u).

(3) Bind it to a key (e.g. `C-c i d'), with the arguments you like.
    Remember that you need an interactive function for key bindings:

(global-set-key [(control c) (i) (d)]
		'(lambda ()
		   (interactive)
		   (shell-command "date" t t)))

Bye, Reiner.
-- 
       ,,,
      (o o)
---ooO-(_)-Ooo--- PGP key available via WWW   http://rsteib.home.pages.de/

Re: inserting date and time at the cursor location

[ken]

Here's some elisp which does them separately... what I use:

(defun now ()
  "Insert string for the current time formatted like '2:34 PM'."
  (interactive)                 ; permit invocation in minibuffer
  (insert (format-time-string "%-I:%M %p"))
)


(defun today ()
  "Insert string for today's date nicely formatted in American style,
e.g. Sunday, September 17, 2000."
  (interactive)                 ; permit invocation in minibuffer
  (insert (format-time-string "%A, %B %e, %Y"))
)

Put these in a file in your emacs path.  Do "M-x today" or "M-x now" to 
invoke.  Also, it should be obvious how to integrate the two.


hth,
ken

-- 
AMD crashes?  See http://cleveland.lug.net/~ken/amd-problem/.

Spake Guy-Armand Kamendje at 15:03 (UTC+0200) on Wed, 2 Oct 2002:

= Hi,
= Is there a way to let xemacs insert the current date and time at the actual
= cursor location?
= Thanks for any hint
= Guy
= 
= 
= _______________________________________________
= Help-gnu-emacs mailing list
= Help-gnu-emacs@gnu.org
= http://mail.gnu.org/mailman/listinfo/help-gnu-emacs
= 

Re: inserting date and time at the cursor location

[Mario Lang]

Clemens Fischer <ino@despammed.com> writes:

> David Kastrup <David.Kastrup@t-online.de> writes:
>
>> You could also use
>> C-u M-! date RET
>
> ok, how do i bind this to a key?

Using keyboard macros for instance:

C-x ( C-u M-! date RET C-x )

Now you can use C-x e to call the last kbd macro or

M-x edit-kbd-macro RET C-x e 

to see the whole macro, being able to edit it and give it a name
and keybinding.  Use C-c C-c to save.

-- 
CYa,
  Mario

Re: inserting date and time at the cursor location

[A. Tsakiris]

> (defun jh-insert-current-time ()
>   (interactive)
>   (insert (current-time-string)))
> 
> Then do `M-x jh-insert-current-time' or bind it to some key sequence.

  > ok, how do i bind this to a key?
  > 

Try

(global-set-key (kbd "C-c d") 'jh-insert-current-date)

in your .emacs file.  This will bind the function to the key
sequence C-c d.

-- 
A. Tsakiris