aboutsummaryrefslogtreecommitdiff
path: root/emacs/.emacs.d/lisp/my/my-prog.el
diff options
context:
space:
mode:
Diffstat (limited to 'emacs/.emacs.d/lisp/my/my-prog.el')
-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)))))