diff --git a/zshrc.org b/zshrc.org index 57a4a43..c6eb0e3 100644 --- a/zshrc.org +++ b/zshrc.org @@ -12,10 +12,10 @@ are daily and pi, the function returns '(".zshrc" ".zshrc.pi") #+name:def-tag #+begin_src emacs-lisp :results output silent - (setq tag-to-filenames-alist '(("daily" . ".zshrc") - ("blender" . ".zshrc.blender") - ("pi" . "/ssh:ssh.jacopods.xyz:.zshrc") - ("android" . ".zshrc.android"))) + (setq-local tag-to-filenames-alist '( ("daily" . ".zshrc") + ("blender" . ".zshrc.blender") + ("pi" . "/ssh:ssh.jacopods.xyz:.zshrc") + ("android" . ".zshrc.android"))) (defun org-tags-to-filenames () (let ((tags (car (last (org-heading-components))))) (when (stringp tags) @@ -506,5 +506,7 @@ technique * Local variables # local variables: -# eval: (save-excursion (org-babel-goto-named-src-block "def-tag") (org-babel-execute-src-block)) +# org-confirm-babel-evaluate: nil +# eval: (save-excursion (org-babel-goto-named-src-block "def-tag") +# (org-babel-execute-src-block) (outline-hide-sublevels 1)) # end: