5

我想在emacs orgmode中以自定义格式插入时间戳。我想以这种形式插入当前时间（没有日期！）：[HH:MM]，按。我对 lisp 完全陌生，无法弄清楚如何做到这一点。我的 -file 的起点是这样的：C-c -~/.emacs

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


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

现在这只是我的自定义函数的定义org-my-custom-timestamp，即“交互”和快捷方式分配。但是，我尝试了各种方法，:SOME_CODE:但都没有成功。

可以在函数中安装什么以使其以所描述的方式工作？

是否有任何有经验的 emacs 用户甚至考虑过这种方法来解决它，或者是否有更聪明的方法来做到这一点？也许是 org-mode-internally？

4

1 回答 1

6

Org 模式的本地键盘映射有一个 bind 的条目C-c -，所以我们必须更改它而不是全局的：

(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)))

再次注意，它用您自己的命令替换了默认情况下在 Org 模式下org-ctrl-c-minus绑定的命令。C-c -

于 2012-08-07T13:25:19.657 回答