From d5323940a1f75f262d836861ee2a824234fc7146 Mon Sep 17 00:00:00 2001 From: Jacopo De Simoi Date: Sat, 21 May 2022 23:57:08 -0400 Subject: [PATCH] Restructure the hierarchy This is to prevent a bug that made half of the document invisible upon opening --- zshrc.org | 55 ++++++++++++++++++++++++++++++------------------------- 1 file changed, 30 insertions(+), 25 deletions(-) diff --git a/zshrc.org b/zshrc.org index 56b45c1..4222260 100644 --- a/zshrc.org +++ b/zshrc.org @@ -5,6 +5,27 @@ #+HUGO_SECTION: zshrc #+OPTIONS: creator:t toc:nil +* Setup org-babel +This helper function checks the tags of the current headline and +returns a list of corresponding filenames. For instance if the tags +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" . ".zshrc.pi") + ("android" . ".zshrc.android") + ("mips" . ".zshrc.mips"))) + (defun org-tags-to-filenames () + (let ((tags (car (last (org-heading-components))))) + (when (stringp tags) + (remove nil (mapcar + (lambda (tag) + (cdr (assoc tag tag-to-filenames-alist))) + (org-split-string tags ":")))))) +#+end_src + * zshrc :@zsh: All posts in here will have the category set to /zsh/. ** zshrc @@ -14,6 +35,13 @@ All posts in here will have the category set to /zsh/. :EXPORT_HUGO_MENU: :menu "main" :header-args: :tangle (org-tags-to-filenames) :END: + +# Note that one would have to export only this subtree, otherwise it +# is not going to work… This would need to be investigated + +# also, we need to ensure that the hugo thingie is called upon +# export. how to do that? + This is my ~.zshrc~; it will be used in many environments: - daily driver (gentoo box with kde) - blender box (gentoo box with no gui) @@ -23,43 +51,20 @@ This is my ~.zshrc~; it will be used in many environments: Each environment has slightly different setups, which will be tangled to different files according to the function `org-tags-to-filenames', -which checks the tags of the current headline and returns a list of -corresponding filenames. For instance if the tags 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" . ".zshrc.pi") - ("android" . ".zshrc.android") - ("mips" . ".zshrc.mips"))) - (defun org-tags-to-filenames () - (let ((tags (car (last (org-heading-components))))) - (when (stringp tags) - (remove nil (mapcar - (lambda (tag) - (cdr (assoc tag tag-to-filenames-alist))) - (org-split-string tags ":")))))) -#+end_src - +defined in the previous section. *** Include :daily:pi:android: - First, include a script that sets a number of confidential data (e.g. API keys and such) - #+BEGIN_SRC sh + #+begin_src sh source ~/.config/confidential.sh # This defines a number of env variables: # ANDROID_A3=xxxx # ANDROID_BLU=xxx # ANDROID_IP=xxx.xxx.xxx.xxx - # ifttt_apikey=xyz #+end_src Then, add helper directory to fpath #+begin_src sh fpath=(~/clones/zshrc/ $fpath) - #+end_src *** KDE helpers :daily: