Cambiar directorio qutebrowser y cambiar funciones del blog de la configuracion de emacs

emacs.d/init-literate.org

@@ -1658,7 +1658,7 @@ Sirve para publicar en =nikola= con marcado =org-mode=. Si no está instalado, l
     )
 #+END_SRC
 
-Las funciones cutres son mías, si me animo algún día las mejoraré.
+Las funciones cutres son mías.
 
 #+name:org2nikola
 #+BEGIN_SRC emacs-lisp
@@ -1674,22 +1674,22 @@ Las funciones cutres son mías, si me animo algún día las mejoraré.
     (defun blog/build ()
       "Construye la web."
       (interactive)
-      (compile (concat "source ~/.env/blog/bin/activate; cd " org2nikola-output-root-directory "; bash scripts/construir.sh; deactivate") t))
+      (compile (concat "source ~/.env/blog/bin/activate; cd " org2nikola-output-root-directory "; bash scripts/construir.sh; deactivate")))
 
     (defun blog/serve ()
       "Sirve la web en un servidor web interno."
       (interactive)
-      (compile (concat "source ~/.env/blog/bin/activate; cd " org2nikola-output-root-directory "; qutebrowser --target tab-bg-silent http://localhost:8000 2> /dev/null &; nikola serve; deactivate;") t))
+      (compile (concat "source ~/.env/blog/bin/activate; cd " org2nikola-output-root-directory "; qutebrowser --target tab-bg-silent http://localhost:8000 2> /dev/null &; nikola serve; deactivate;")))
 
     (defun blog/clean ()
       "Borra la carpeta output para empezar de cero."
       (interactive)
-      (compile (concat "source ~/.env/blog/bin/activate; cd " org2nikola-output-root-directory "; nikola clean; deactivate")) t)
+      (compile (concat "source ~/.env/blog/bin/activate; cd " org2nikola-output-root-directory "; nikola clean; deactivate")))
 
     (defun blog/deploy ()
       "Despliega la web al momento preguntando por el nombre del commit."
       (interactive)
-      (compile (concat "source ~/.env/blog/bin/activate; cd " org2nikola-output-root-directory "; nikola deploy; deactivate;") t))
+      (compile (concat "source ~/.env/blog/bin/activate; cd " org2nikola-output-root-directory "; nikola deploy; deactivate;")))
 
     (defun blog/autodeploy ()
       "Despliega la web automáticamente el día designado."
@@ -1697,6 +1697,7 @@ Las funciones cutres son mías, si me animo algún día las mejoraré.
       (insert
        (compile (concat "/usr/local/bin/programa-post " (org-read-date)))))
 
+    ;; Las dos siguientes funciones probablemente no sirvan a nadie
     (defun blog/url-post ()
       "Devuelve el enlace del articulo en el que esté el cursor."
       (interactive)
@@ -1834,7 +1835,7 @@ A diferencia de la función de writequit, esta establece el título como custom\
            "* TODO %? \n:PROPERTIES:\n:CREATED: %u\n:END:\nSCHEDULED: %(org-insert-time-stamp (org-read-date nil t \"+0d\"))\n")
 
           ("b" "Idea per article" entry (file "~/Documentos/blog/Articulos/articulos.org" "Blog")
-           "* TODO %?\n:PROPERTIES:\n:CREATED: %u\n:END:\n")
+           "** TODO %?\n:PROPERTIES:\n:CREATED: %u\n:END:\n")
 
           ("p" "Personal" entry (file+headline "~/Documentos/org/index.org" "Personal")
            "* TODO %? \n:PROPERTIES:\n:CREATED: %u\n:END:\nSCHEDULED: %(org-insert-time-stamp (org-read-date nil t \"+0d\"))\n")