Marca de tiempo personalizada en emacs orgmode

Question

Me gustaría insertar timestamp en un formato personalizado en emacs orgmode. Quiero insertar solo la hora actual (¡sin fecha!) En esta forma: [HH: MM], presionando C-c -. Soy completamente nuevo para lisp y no pude encontrar la manera de hacerlo. Mi punto de partida de mi ~/.emacs -file es así:

(defun org-my-custom-timestamp() 
    (interactive) 
    (:SOME_CODE:) 
) 


(define-key global-map "\C-c-" 'org-my-custom-timestamp) 

Ahora bien, esto es sólo la definición de mi función personalizada llamada org-my-custom-timestamp, el "interactivation" y un acceso directo a la cesión. Sin embargo, he intentado varias cosas para :SOME_CODE: sin ningún éxito.

¿Qué se puede instalar en la función para que funcione de la manera descrita?

¿Algún usuario de emacs experimentado incluso considera que esta forma de abordarlo es práctica o existe una forma más inteligente de hacerlo? Tal vez org-mode-internamente?

Answer 1

mapa de teclas local de

de modo Org tiene una entrada que une C-c -, así que tenemos que cambiarlo en lugar de un global:

(defun org-my-custom-timestamp() 
    (interactive) 
    (insert (format-time-string "[%H:%M]"))) 
(add-hook 'org-mode-hook 
      (lambda() 
      (local-set-key "\C-c-" 'org-my-custom-timestamp))) 

Nota de nuevo que reemplaza el comando org-ctrl-c-minus, que está obligado a C-c - por defecto en modo Org, con el tuyo.