aboutsummaryrefslogtreecommitdiff
path: root/emacs/.emacs.d/lisp/my
diff options
context:
space:
mode:
authorYuchen Pei <id@ypei.org>2023-08-03 08:29:49 +1000
committerYuchen Pei <id@ypei.org>2023-08-03 08:29:49 +1000
commit53d94b9afd8dd51dd591f70b4f00b77c3ed403b4 (patch)
treecc0a805c0077ac7869e6e6af6773c37ceff0ee1f /emacs/.emacs.d/lisp/my
parent66aac92722ec86788367749aa25214a0baaa89a6 (diff)
fixing a few things in bbdb, json and org
Diffstat (limited to 'emacs/.emacs.d/lisp/my')
-rw-r--r--emacs/.emacs.d/lisp/my/my-prog.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/emacs/.emacs.d/lisp/my/my-prog.el b/emacs/.emacs.d/lisp/my/my-prog.el
index a38f956..e84478d 100644
--- a/emacs/.emacs.d/lisp/my/my-prog.el
+++ b/emacs/.emacs.d/lisp/my/my-prog.el
@@ -417,6 +417,9 @@ REVISION is the commit hash."
(mapcar 'prin1-to-string (plist-get (json-path-to-position (point)) :path))
"/"))
+(defun my-json-set-header-line-hook ()
+ (when (< (point-max) 100000 (my-json-set-header-line-to-path))))
+
(defun my-json-set-header-line-to-path ()
(setq header-line-format
'((:eval (my-json-mode-path)))))