Re: [O] default file for any .org file
Hello, If I understand well, you are looking for a template. On my side, I used yatemplate coupled with auto-insert. Here is the part of configuration I have: (use-package yatemplate :ensure t :after yasnippet :config ;; Define template directory (setq yatemplate-dir (concat config-basedir "/third_parties/templates")) ;; Coupling with auto-insert (setq auto-insert-alist nil) (yatemplate-fill-alist) (add-hook 'find-file-hook 'auto-insert) ) I use a template like the one attached which is place on the directory "/third_parties/templates". I let you adapt but technically it should work with many adaptations. Kind regards, Sébastien #+TITLE: #+AUTHOR: `user-full-name` #+EMAIL: `user-mail-address` #+DATE: `(format-time-string "%e %B %Y")` #+DESCRIPTION: #+KEYWORDS: #+LANGUAGE: fr #+OPTIONS: H:3 num:t toc:t \n:nil @:t ::t |:t ^:t -:t f:t *:t <:t #+SELECT_TAGS: export #+EXCLUDE_TAGS: noexport #+HTML_HEAD: http://www.coli.uni-saarland.de/~slemaguer/default.css"; /> #+HTML_HEAD: * COMMENT some extra configuration On Thu, Oct 19 2017 (06:55), Joseph Vidal-Rosset wrote: Hello the list, I apologize if the reply to my question has already be given here of if it is in the org-mode website. I would be happy to get in advance, for any new .org file that I am going to create, some properties given by default, for example the following links for .bib file: bibliography:/home/joseph/MEGA/org/reforg.bib bibliographystyle:smfplain and others things that I am always constrained to copy from previous .org files and paste in the new one. Your suggestions and your help will be very welcome, Joseph -- Save our in-boxes! http://emailcharter.org ============ Dr. Sébastien Le Maguer Postdoctorate researcher Co-chair of SYNSIG (https://synsig.org/index.php/Main_Page) Saarland University Campus C7.4 - room 2.03 D-66123 Saarbrücken Germany phone : +49-681-302-70030 Mail: slemag...@coli.uni-saarland.de website : http://www.coli.uni-saarland.de/~slemaguer/
Re: [O] Bug: org-agenda-span value not quoted via customize interface
Hello I might say something stupid buy isn't it 'day (with a simple quote) ? Sent from Blue On 30 Aug 2017, 14:45, at 14:45, Niall Dooley wrote: >Hi all, > >This is my first mail to this list so please tell me if I haven't >followed the expected conventions. > >I created the following org-agenda-custom-command via the customise >interface > > '(org-agenda-custom-commands > (quote >(("A" "Priority #A tasks" agenda "" > ((org-agenda-span day) > (org-agenda-overriding-header "Today's priority #A tasks: ") > (org-agenda-skip-function >(quote > (org-agenda-skip-entry-if > (quote notregexp) > "\\=.*\\[#A\\]" > >I receive the following error: > >Symbol’s value as variable is void: day > >The default value of week seems to be quoted. Manually, quoting the >value day in the above snippet resolves the error. So it just seems >like >choosing a value through the available choices in the customise >interface does not automatically quote the choice. > >Regards, > >Niall > >Emacs : GNU Emacs 25.2.1 (i686-w64-mingw32) of 2017-04-24 >Package: Org mode version 9.0.9 (9.0.9-68-g492420-elpaplus @ >d:/.emacs.d/elpa/org-plus-contrib-20170807/)
[O] switch export subtree
Hello, I'm looking for a way to switch of the export of a specific subtree in a document using a specific exporter. For example, let's assume the document * Section 1 ** Subsection 11 ** Subsection 12 I would like to export only Subsection 11 into HTML and only Subsection 12 into LATEX/PDF. Is there some kind of property to control that ? Or maybe another way ? Thanks a lot, Sébastien -- Save our in-boxes! http://emailcharter.org ==== Dr. Sébastien Le Maguer Postdoctorate researcher Co-chair of SYNSIG (https://synsig.org/index.php/Main_Page) Saarland University Campus C7.4 - room 2.03 D-66123 Saarbrücken Germany phone : +49-681-302-70030 Mail: slemag...@coli.uni-saarland.de website : http://www.coli.uni-saarland.de/~slemaguer/
Re: [O] Fontification error
>> ... ...) (org-remove-flyspell-overlays-in end1 end) (cond ... ... ... >> ... ...) (add-text-properties beg beg1 ...) (add-text-properties ... >> ... ...) t))) ((member dc1 (quote ("+title:" "+author:" "+email:" >> "+date:"))) (org-remove-flyspell-overlays-in (match-beginning 0) (if >> (equal "+title:" dc1) (match-end 2) (match-end 0))) >> (add-text-properties beg (match-end 3) (if (member ... >> org-hidden-keywords) (quote ...) (quote ...))) (add-text-properties >> (match-beginning 6) (min (point-max) (1+ ...)) (if (string-equal dc1 >> "+title:") (quote ...) (quote ... ((string-prefix-p "+caption" >> dc1) (org-remove-flyspell-overlays-in (match-end 2) (match-end 0)) >> (remove-text-properties (match-beginning 0) (match-end 0) (quote >> (display t invisible t intangible t))) (save-excursion >> (beginning-of-line) (looking-at "\\([ >> ]*#\\+caption\\(?:\\[.*\\]\\)?:\\)[ ]*")) (add-text-properties >> (line-beginning-position) (match-end 1) (quote (font-lock-fontified t >> face org-meta-line))) (add-text-properties (match-end 0) >> (line-end-position) (quote (font-lock-fontified t face org-block))) t) >> ((member dc3 (quote (" " ""))) (org-remove-flyspell-overlays-in beg >> (match-end 0)) (add-text-properties beg (match-end 0) (quote >> (font-lock-fontified t face font-lock-comment-face (t >> (org-remove-flyspell-overlays-in (match-beginning 0) (match-end 0)) >> (remove-text-properties (match-beginning 0) (match-end 0) (quote >> (display t invisible t intangible t))) (add-text-properties beg >> (match-end 0) (quote (font-lock-fontified t face org-meta-line))) >> t) >> (let ((case-fold-search t)) (if (re-search-forward "^\\([ >> ]*#\\(\\(\\+[a-zA-Z]+:?\\| \\|$\\)\\(_\\([a-zA-Z]+\\)\\)?\\)[ >> ]*\\(\\([^ \n]*\\)[ ]*\\(.*\\)\\)\\)" limit t) (progn (let ((beg >> (match-beginning 0)) (block-start (match-end 0)) (block-end nil) (lang >> (match-string 7)) (beg1 (line-beginning-position 2)) (dc1 (downcase >> (match-string 2))) (dc3 (downcase (match-string 3))) end end1 quoting >> block-type) (cond ((and (match-end 4) (equal dc3 "+begin")) (setq >> block-type (downcase ...) quoting (member block-type >> org-protecting-blocks)) (if (re-search-forward ... nil t) (progn ... >> ... ... ... ... ... ... ... ... ... ... t))) ((member dc1 (quote ...)) >> (org-remove-flyspell-overlays-in (match-beginning 0) (if ... ... ...)) >> (add-text-properties beg (match-end 3) (if ... ... ...)) >> (add-text-properties (match-beginning 6) (min ... ...) (if ... ... >> ...))) ((string-prefix-p "+caption" dc1) >> (org-remove-flyspell-overlays-in (match-end 2) (match-end 0)) >> (remove-text-properties (match-beginning 0) (match-end 0) (quote ...)) >> (save-excursion (beginning-of-line) (looking-at "\\([ >> ]*#\\+caption\\(?:\\[.*\\]\\)?:\\)[ ]*")) (add-text-properties >> (line-beginning-position) (match-end 1) (quote ...)) >> (add-text-properties (match-end 0) (line-end-position) (quote ...)) t) >> ((member dc3 (quote ...)) (org-remove-flyspell-overlays-in beg >> (match-end 0)) (add-text-properties beg (match-end 0) (quote ...))) (t >> (org-remove-flyspell-overlays-in (match-beginning 0) (match-end 0)) >> (remove-text-properties (match-beginning 0) (match-end 0) (quote ...)) >> (add-text-properties beg (match-end 0) (quote ...)) t)) >> org-fontify-meta-lines-and-blocks-1(37) >> org-fontify-meta-lines-and-blocks(37) >> font-lock-fontify-keywords-region(1 37 nil) >> font-lock-default-fontify-region(1 37 nil) >> font-lock-fontify-region(1 37 nil) >> font-lock-default-fontify-buffer() >> font-lock-fontify-buffer() >> org-bullets-mode() >> run-hooks(change-major-mode-after-body-hook text-mode-hook >> outline-mode-hook org-mode-hook) >> apply(run-hooks (change-major-mode-after-body-hook text-mode-hook >> outline-mode-hook org-mode-hook)) >> run-mode-hooks(org-mode-hook) >> org-mode() >> set-auto-mode-0(org-mode nil) >> set-auto-mode() >> normal-mode(t) >> after-find-file(nil t) >> find-file-noselect-1(# "~/Dropbox >> (Personal)/Notes/test.org" nil nil "~/Dropbox >> (Personal)/Notes/test.org" (213415716 16777220)) >> find-file-noselect("/Users/aaronjensen/Dropbox >> (Personal)/Notes/test.org" nil nil nil) >> find-file("/Users/aaronjensen/Dropbox (Personal)/Notes/test.org") >> find-file-existing("/Users/aaronjensen/Dropbox (Personal)/Notes/test.org") >> (lambda (&rest ignore) (find-file-existing >> "/Users/aaronjensen/Dropbox (Personal)/Notes/test.org"))((push-button >> :args nil :value "~/Dropbox (Personal)/Notes/test.org" :action (lambda >> (&rest ignore) (find-file-existing "/Users/aaronjensen/Dropbox >> (Personal)/Notes/test.org")) :mouse-face highlight :follow-link " >> " :button-prefix "" :button-suffix "" :format "%[%t%]" :button-overlay >> # :from #> after insertion) at 1115 in *spacemacs*> :to #> *spacemacs*>) nil) >> widget-apply((push-button :args nil :value "~/Dropbox >> (Personal)/Notes/test.org" :action (lambda (&rest ignore) >> (find-file-existing "/Users/aaronjensen/Dropbox >> (Personal)/Notes/test.org")) :mouse-face highlight :follow-link " >> " :button-prefix "" :button-suffix "" :format "%[%t%]" :button-overlay >> # :from #> after insertion) at 1115 in *spacemacs*> :to #> *spacemacs*>) :action nil) >> widget-apply-action((push-button :args nil :value "~/Dropbox >> (Personal)/Notes/test.org" :action (lambda (&rest ignore) >> (find-file-existing "/Users/aaronjensen/Dropbox >> (Personal)/Notes/test.org")) :mouse-face highlight :follow-link " >> " :button-prefix "" :button-suffix "" :format "%[%t%]" :button-overlay >> # :from #> after insertion) at 1115 in *spacemacs*> :to #> *spacemacs*>) nil) >> widget-button-press(1142) >> funcall-interactively(widget-button-press 1142) >> call-interactively(widget-button-press nil nil) >> command-execute(widget-button-press) -- Dr. Sébastien Le Maguer Postdoctorate researcher Saarland University Campus C7.4 - room 2.03 D-66123 Saarbrücken Germany phone : +49-681-302-70030 Mail: slemag...@coli.uni-saarland.de website : http://www.coli.uni-saarland.de/~slemaguer/
Re: [O] Fontification error
Hello, I do have the same problem but I think it might be more a theme issues than an org-mode one. I try to find a minimal example but @Thomas, are you using a specific theme ? Kind regards, Sébastien On Mon, Feb 13 2017 (18:21), Nicolas Goaziou wrote: > Hello, > > "Thomas S. Dye" writes: > >> I get fontification error messages when loading Org mode files since >> upgrading this morning. >> >> org-mode fontification error in # at 685 >> >> Org mode version 9.0.5 (9.0.5-elpaplus @ >> /Users/dk/.emacs.d/elpa/org-plus-contrib-20170210/) >> >> Let me know if you have questions. > > I cannot reproduce it. Could you provide an ECM? > > Regards, -- Dr. Sébastien Le Maguer Postdoctorate researcher Saarland University Campus C7.4 - room 2.03 D-66123 Saarbrücken Germany phone : +49-681-302-70030 Mail: slemag...@coli.uni-saarland.de website : http://www.coli.uni-saarland.de/~slemaguer/
[O] more global keys in ox-bibtex
Dear All, I did a mini-patch to capture completely the key in bibtex export. For example for the following key, in the bibtex2html produced file: Balestri et al., 1999 only Balestri will be captured instead of Balestri et al., 1999 As it is 3 characters, I just submit the patch here and hope it might help :) Kind regards, Sébastien diff --git a/contrib/lisp/ox-bibtex.el b/contrib/lisp/ox-bibtex.el index 56dec38..fb34a5e 100644 --- a/contrib/lisp/ox-bibtex.el +++ b/contrib/lisp/ox-bibtex.el @@ -235,7 +235,7 @@ Return new parse tree." ;; Update `org-bibtex-html-entries-alist'. (goto-char (point-min)) (while (re-search-forward - "a name=\"\\([-_a-zA-Z0-9:]+\\)\">\\(\\w+\\)" nil t) + "a name=\"\\([-_a-zA-Z0-9:]+\\)\">\\([^<]+\\)" nil t) (push (cons (match-string 1) (match-string 2)) org-bibtex-html-entries-alist))) ;; Open produced HTML file, wrap references within a block and -- Dr. Sébastien Le Maguer Postdoctorate researcher Saarland University Campus C7.4 - room 2.03 D-66123 Saarbrücken Germany phone : +49-681-302-70030 Mail: slemag...@coli.uni-saarland.de website : http://www.coli.uni-saarland.de/~slemaguer/