From: Rainer Stengele <rainer.stengele@online.de>
Cc: emacs-orgmode@gnu.org
Subject: Re: Lisp error when starting agenda
Date: Thu, 04 Jul 2013 15:43:14 +0200 [thread overview]
Message-ID: <51D57BF2.7070301@online.de> (raw)
In-Reply-To: <kr3tn2$p1o$1@ger.gmane.org>
Going back to
git checkout f0c2a680568009ad2f93020af8134dbd481070e2
works again, so I assume it could be the following commit.
Rainer
Am 04.07.2013 15:35, schrieb Rainer Stengele:
> All,
>
> I pulled today and since then run into this issue after starting an agenda:
>
> Please help!
>
> Rainer
>
>
> Debugger entered--Lisp error: (wrong-type-argument char-or-string-p nil)
> upcase(nil)
> (setq key (upcase (match-string 1 ext-setup-or-nil)) value (org-match-string-no-properties 2 ext-setup-or-nil))
> (while (or (and ext-setup-or-nil (not org-ota) (let (ret) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect
> (progn ... ...) (and ... ...)))) (setq org-file-tags (delq nil (append org-file-tags (nth 0 ret))) org-tag-alist (delq nil (append org-tag-alist (nth 1 ret))) org-tag-groups-alist
> (delq nil (append org-tag-groups-alist (nth 2 ret))) org-ota t))) (and ext-setup-or-nil (string-match re ext-setup-or-nil start) (setq start (match-end 0))) (and (setq
> ext-setup-or-nil nil start 0) (re-search-forward re nil t))) (setq key (upcase (match-string 1 ext-setup-or-nil)) value (org-match-string-no-properties 2 ext-setup-or-nil)) (if
> (stringp value) (setq value (org-trim value))) (cond ((equal key "CATEGORY") (setq cat value)) ((member key (quote ("SEQ_TODO" "TODO"))) (setq kwds (cons (cons (quote sequence)
> (org-split-string value splitre)) kwds))) ((equal key "TYP_TODO") (setq kwds (cons (cons (quote type) (org-split-string value splitre)) kwds))) ((string-match
> "\\`\\([a-zA-Z][0-9a-zA-Z_]*\\)_TODO\\'" key) (setq kwds (cons (cons (intern (downcase ...)) (org-split-string value splitre)) kwds))) ((equal key "COLUMNS") (org-set-local (quote
> org-columns-default-format) value)) ((equal key "LINK") (if (string-match "^\\(\\S-+\\)[ ]+\\(.+\\)" value) (progn (setq links (cons (cons ... ...) links))))) ((equal key
> "PRIORITIES") (setq prio (org-split-string value " +"))) ((equal key "PROPERTY") (if (string-match "\\(\\S-+\\)\\s-+\\(.*\\)" value) (progn (setq props (org-update-property-plist
> (match-string 1 value) (match-string 2 value) props))))) ((equal key "DRAWERS") (setq drawers (delete-dups (append org-drawers (org-split-string value splitre))))) ((equal key
> "CONSTANTS") (org-table-set-constants)) ((equal key "STARTUP") (let ((opts (org-split-string value splitre)) l var val) (while (setq l (car (prog1 opts ...))) (if (setq l (assoc l
> org-startup-options)) (progn (setq var ... val ...) (if ... ... ... ... ...)))))) ((equal key "ARCHIVE") (setq arch value) (remove-text-properties 0 (length arch) (quote (face t
> fontified t)) arch)) ((equal key "OPTIONS") (if (string-match "\\([ ]\\|\\`\\)\\^:\\(t\\|nil\\|{}\\)" value) (setq scripts (read (match-string 2 value))))) ((and (equal key
> "SETUPFILE") (not buffer-read-only)) (setq setup-contents (org-file-contents (expand-file-name (org-remove-double-quotes value)) (quote noerror))) (if (not ext-setup-or-nil) (setq
> ext-setup-or-nil setup-contents start 0) (setq ext-setup-or-nil (concat (substring ext-setup-or-nil 0 start) "\n" setup-contents "\n" (substring ext-setup-or-nil start)))))))
> (save-restriction (widen) (goto-char (point-min)) (while (or (and ext-setup-or-nil (not org-ota) (let (ret) (let ((temp-buffer ...)) (save-current-buffer (set-buffer temp-buffer)
> (unwind-protect ... ...))) (setq org-file-tags (delq nil (append org-file-tags ...)) org-tag-alist (delq nil (append org-tag-alist ...)) org-tag-groups-alist (delq nil (append
> org-tag-groups-alist ...)) org-ota t))) (and ext-setup-or-nil (string-match re ext-setup-or-nil start) (setq start (match-end 0))) (and (setq ext-setup-or-nil nil start 0)
> (re-search-forward re nil t))) (setq key (upcase (match-string 1 ext-setup-or-nil)) value (org-match-string-no-properties 2 ext-setup-or-nil)) (if (stringp value) (setq value
> (org-trim value))) (cond ((equal key "CATEGORY") (setq cat value)) ((member key (quote ("SEQ_TODO" "TODO"))) (setq kwds (cons (cons (quote sequence) (org-split-string value
> splitre)) kwds))) ((equal key "TYP_TODO") (setq kwds (cons (cons (quote type) (org-split-string value splitre)) kwds))) ((string-match "\\`\\([a-zA-Z][0-9a-zA-Z_]*\\)_TODO\\'" key)
> (setq kwds (cons (cons (intern ...) (org-split-string value splitre)) kwds))) ((equal key "COLUMNS") (org-set-local (quote org-columns-default-format) value)) ((equal key "LINK")
> (if (string-match "^\\(\\S-+\\)[ ]+\\(.+\\)" value) (progn (setq links (cons ... links))))) ((equal key "PRIORITIES") (setq prio (org-split-string value " +"))) ((equal key
> "PROPERTY") (if (string-match "\\(\\S-+\\)\\s-+\\(.*\\)" value) (progn (setq props (org-update-property-plist ... ... props))))) ((equal key "DRAWERS") (setq drawers (delete-dups
> (append org-drawers (org-split-string value splitre))))) ((equal key "CONSTANTS") (org-table-set-constants)) ((equal key "STARTUP") (let ((opts (org-split-string value splitre)) l
> var val) (while (setq l (car ...)) (if (setq l ...) (progn ... ...))))) ((equal key "ARCHIVE") (setq arch value) (remove-text-properties 0 (length arch) (quote (face t fontified
> t)) arch)) ((equal key "OPTIONS") (if (string-match "\\([ ]\\|\\`\\)\\^:\\(t\\|nil\\|{}\\)" value) (setq scripts (read (match-string 2 value))))) ((and (equal key "SETUPFILE")
> (not buffer-read-only)) (setq setup-contents (org-file-contents (expand-file-name (org-remove-double-quotes value)) (quote noerror))) (if (not ext-setup-or-nil) (setq
> ext-setup-or-nil setup-contents start 0) (setq ext-setup-or-nil (concat (substring ext-setup-or-nil 0 start) "\n" setup-contents "\n" (substring ext-setup-or-nil start)))))))
> (goto-char (point-min)) (while (re-search-forward org-block-regexp nil t) (if (equal "PROPERTY" (upcase (match-string 1))) (progn (setq value (replace-regexp-in-string "[\n
> ]" " " (match-string 4))) (if (string-match "\\(\\S-+\\)\\s-+\\(.*\\)" value) (progn (setq props (org-update-property-plist ... ... props))))))))
> (save-excursion (save-restriction (widen) (goto-char (point-min)) (while (or (and ext-setup-or-nil (not org-ota) (let (ret) (let (...) (save-current-buffer ... ...)) (setq
> org-file-tags (delq nil ...) org-tag-alist (delq nil ...) org-tag-groups-alist (delq nil ...) org-ota t))) (and ext-setup-or-nil (string-match re ext-setup-or-nil start) (setq
> start (match-end 0))) (and (setq ext-setup-or-nil nil start 0) (re-search-forward re nil t))) (setq key (upcase (match-string 1 ext-setup-or-nil)) value
> (org-match-string-no-properties 2 ext-setup-or-nil)) (if (stringp value) (setq value (org-trim value))) (cond ((equal key "CATEGORY") (setq cat value)) ((member key (quote
> ("SEQ_TODO" "TODO"))) (setq kwds (cons (cons ... ...) kwds))) ((equal key "TYP_TODO") (setq kwds (cons (cons ... ...) kwds))) ((string-match
> "\\`\\([a-zA-Z][0-9a-zA-Z_]*\\)_TODO\\'" key) (setq kwds (cons (cons ... ...) kwds))) ((equal key "COLUMNS") (org-set-local (quote org-columns-default-format) value)) ((equal key
> "LINK") (if (string-match "^\\(\\S-+\\)[ ]+\\(.+\\)" value) (progn (setq links ...)))) ((equal key "PRIORITIES") (setq prio (org-split-string value " +"))) ((equal key "PROPERTY")
> (if (string-match "\\(\\S-+\\)\\s-+\\(.*\\)" value) (progn (setq props ...)))) ((equal key "DRAWERS") (setq drawers (delete-dups (append org-drawers ...)))) ((equal key
> "CONSTANTS") (org-table-set-constants)) ((equal key "STARTUP") (let ((opts ...) l var val) (while (setq l ...) (if ... ...)))) ((equal key "ARCHIVE") (setq arch value)
> (remove-text-properties 0 (length arch) (quote (face t fontified t)) arch)) ((equal key "OPTIONS") (if (string-match "\\([ ]\\|\\`\\)\\^:\\(t\\|nil\\|{}\\)" value) (setq scripts
> (read ...)))) ((and (equal key "SETUPFILE") (not buffer-read-only)) (setq setup-contents (org-file-contents (expand-file-name ...) (quote noerror))) (if (not ext-setup-or-nil)
> (setq ext-setup-or-nil setup-contents start 0) (setq ext-setup-or-nil (concat ... "\n" setup-contents "\n" ...)))))) (goto-char (point-min)) (while (re-search-forward
> org-block-regexp nil t) (if (equal "PROPERTY" (upcase (match-string 1))) (progn (setq value (replace-regexp-in-string "[\n
> ]" " " (match-string 4))) (if (string-match "\\(\\S-+\\)\\s-+\\(.*\\)" value) (progn (setq props ...))))))))
> (let ((re (org-make-options-regexp (quote ("CATEGORY" "TODO" "COLUMNS" "STARTUP" "ARCHIVE" "LINK" "PRIORITIES" "CONSTANTS" "PROPERTY" "DRAWERS" "SETUPFILE" "OPTIONS"))
> "\\(?:[a-zA-Z][0-9a-zA-Z_]*_TODO\\)")) (splitre "[ ]+") (scripts org-use-sub-superscripts) kwds kws0 kwsa key log value cat arch const links hw dws tail sep kws1 prio props
> drawers ext-setup-or-nil setup-contents (start 0)) (save-excursion (save-restriction (widen) (goto-char (point-min)) (while (or (and ext-setup-or-nil (not org-ota) (let (ret) (let
> ... ...) (setq org-file-tags ... org-tag-alist ... org-tag-groups-alist ... org-ota t))) (and ext-setup-or-nil (string-match re ext-setup-or-nil start) (setq start (match-end 0)))
> (and (setq ext-setup-or-nil nil start 0) (re-search-forward re nil t))) (setq key (upcase (match-string 1 ext-setup-or-nil)) value (org-match-string-no-properties 2
> ext-setup-or-nil)) (if (stringp value) (setq value (org-trim value))) (cond ((equal key "CATEGORY") (setq cat value)) ((member key (quote ...)) (setq kwds (cons ... kwds))) ((equal
> key "TYP_TODO") (setq kwds (cons ... kwds))) ((string-match "\\`\\([a-zA-Z][0-9a-zA-Z_]*\\)_TODO\\'" key) (setq kwds (cons ... kwds))) ((equal key "COLUMNS") (org-set-local (quote
> org-columns-default-format) value)) ((equal key "LINK") (if (string-match "^\\(\\S-+\\)[ ]+\\(.+\\)" value) (progn ...))) ((equal key "PRIORITIES") (setq prio (org-split-string
> value " +"))) ((equal key "PROPERTY") (if (string-match "\\(\\S-+\\)\\s-+\\(.*\\)" value) (progn ...))) ((equal key "DRAWERS") (setq drawers (delete-dups ...))) ((equal key
> "CONSTANTS") (org-table-set-constants)) ((equal key "STARTUP") (let (... l var val) (while ... ...))) ((equal key "ARCHIVE") (setq arch value) (remove-text-properties 0 (length
> arch) (quote ...) arch)) ((equal key "OPTIONS") (if (string-match "\\([ ]\\|\\`\\)\\^:\\(t\\|nil\\|{}\\)" value) (setq scripts ...))) ((and (equal key "SETUPFILE") (not
> buffer-read-only)) (setq setup-contents (org-file-contents ... ...)) (if (not ext-setup-or-nil) (setq ext-setup-or-nil setup-contents start 0) (setq ext-setup-or-nil ...)))))
> (goto-char (point-min)) (while (re-search-forward org-block-regexp nil t) (if (equal "PROPERTY" (upcase (match-string 1))) (progn (setq value (replace-regexp-in-string "[\n
> ]" " " ...)) (if (string-match "\\(\\S-+\\)\\s-+\\(.*\\)" value) (progn ...))))))) (org-set-local (quote org-use-sub-superscripts) scripts) (if cat (progn (org-set-local (quote
> org-category) (intern cat)) (setq props (cons (cons "CATEGORY" cat) props)))) (if prio (progn (if (< (length prio) 3) (setq prio (quote ("A" "C" "B")))) (setq prio (mapcar (quote
> string-to-char) prio)) (org-set-local (quote org-highest-priority) (nth 0 prio)) (org-set-local (quote org-lowest-priority) (nth 1 prio)) (org-set-local (quote
> org-default-priority) (nth 2 prio)))) (and props (org-set-local (quote org-file-properties) (nreverse props))) (and drawers (org-set-local (quote org-drawers) drawers)) (and arch
> (org-set-local (quote org-archive-location) arch)) (and links (setq org-link-abbrev-alist-local (nreverse links))) (if kwds nil (setq kwds (default-value (quote
> org-todo-keywords))) (if (stringp (car kwds)) (setq kwds (list (cons org-todo-interpretation (default-value (quote org-todo-keywords)))))) (setq kwds (reverse kwds))) (setq kwds
> (nreverse kwds)) (let (inter kws kw) (while (setq kws (car (prog1 kwds (setq kwds (cdr kwds))))) (let ((kws (or (run-hook-with-args-until-success ... kws) kws))) (setq inter (car
> (prog1 kws (setq kws ...))) sep (member "|" kws) kws0 (delete "|" (copy-sequence kws)) kwsa nil kws1 (mapcar (function (lambda ... ...)) kws0) kwsa (if kwsa (append (quote ...)
> (nreverse kwsa) (quote ...))) hw (car kws1) dws (if sep (org-remove-keyword-keys (cdr sep)) (last kws1)) tail (list inter hw (car dws) (org-last dws)))) (add-to-list (quote
> org-todo-heads) hw (quote append)) (setq org-todo-sets (cons kws1 org-todo-sets)) (setq org-done-keywords (append org-done-keywords dws nil)) (setq org-todo-key-alist (append
> org-todo-key-alist kwsa)) (mapc (function (lambda (x) (setq org-todo-kwd-alist (cons ... org-todo-kwd-alist)))) kws1) (setq org-todo-keywords-1 (append org-todo-keywords-1 kws1
> nil))) (setq org-todo-sets (nreverse org-todo-sets) org-todo-kwd-alist (nreverse org-todo-kwd-alist) org-todo-key-trigger (delq nil (mapcar (quote cdr) org-todo-key-alist))
> org-todo-key-alist (org-assign-fast-keys org-todo-key-alist))) (if (not org-done-keywords) (setq org-done-keywords (and org-todo-keywords-1 (list (org-last org-todo-keywords-1)))))
> (setq org-ds-keyword-length (+ 2 (max (length org-deadline-string) (length org-scheduled-string) (length org-clock-string) (length org-closed-string))) org-drawer-regexp (concat
> "^[ ]*:\\(" (mapconcat (quote regexp-quote) org-drawers "\\|") "\\):[ ]*$") org-not-done-keywords (org-delete-all org-done-keywords (copy-sequence org-todo-keywords-1))
> org-todo-regexp (concat "\\(" (mapconcat (quote regexp-quote) org-todo-keywords-1 "\\|") "\\)") org-not-done-regexp (concat "\\(" (mapconcat (quote regexp-quote)
> org-not-done-keywords "\\|") "\\)") org-not-done-heading-regexp (format org-heading-keyword-regexp-format org-not-done-regexp) org-todo-line-regexp (format
> org-heading-keyword-maybe-regexp-format org-todo-regexp) org-complex-heading-regexp (concat "^\\(\\*+\\)" "\\(?: +" org-todo-regexp "\\)?" "\\(?: +\\(\\[#.\\]\\)\\)?" "\\(?:
> +\\(.*?\\)\\)??" "\\(?:[ ]+\\(:[[:alnum:]_@#%:]+:\\)\\)?" "[ ]*$") org-complex-heading-regexp-format (concat "^\\(\\*+\\)" "\\(?: +" org-todo-regexp "\\)?" "\\(?:
> +\\(\\[#.\\]\\)\\)?" "\\(?: +" "\\(?:\\[[0-9%%/]+\\] *\\)?" "\\(%s\\)" "\\(?: *\\[[0-9%%/]+\\]\\)?" "\\)" "\\(?:[ ]+\\(:[[:alnum:]_@#%%:]+:\\)\\)?" "[ ]*$")
> org-todo-line-tags-regexp (concat "^\\(\\*+\\)" "\\(?: +" org-todo-regexp "\\)?" "\\(?: +\\(.*?\\)\\)??" "\\(?:[ ]+\\(:[[:alnum:]:_@#%]+:\\)\\)?" "[ ]*$") org-deadline-regexp
> (concat "\\<" org-deadline-string) org-deadline-time-regexp (concat "\\<" org-deadline-string " *<\\([^>]+\\)>") org-deadline-time-hour-regexp (concat "\\<" org-deadline-string "
> *<\\([^>]+[0-9]\\{1,2\\}:[0-9]\\{2\\}[0-9-+:hdwmy .]*\\)>") org-deadline-line-regexp (concat "\\<\\(" org-deadline-string "\\).*") org-scheduled-regexp (concat "\\<"
> org-scheduled-string) org-scheduled-time-regexp (concat "\\<" org-scheduled-string " *<\\([^>]+\\)>") org-scheduled-time-hour-regexp (concat "\\<" org-scheduled-string "
> *<\\([^>]+[0-9]\\{1,2\\}:[0-9]\\{2\\}[0-9-+:hdwmy .]*\\)>") org-closed-time-regexp (concat "\\<" org-closed-string " *\\[\\([^]]+\\)\\]") org-keyword-time-regexp (concat "\\<\\("
> org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\|" org-clock-string "\\)" " *[[<]\\([^]>]+\\)[]>]") org-keyword-time-not-clock-regexp (concat "\\<\\("
> org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\)" " *[[<]\\([^]>]+\\)[]>]") org-maybe-keyword-time-regexp (concat "\\(\\<\\(" org-scheduled-string "\\|"
> org-deadline-string "\\|" org-closed-string "\\|" org-clock-string "\\)\\)?" " *\\([[<][0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\} ?[^]
> \n>]*?[]>]\\|<%%([^
> \n>]*>\\)") org-all-time-keywords (mapcar (function (lambda (w) (substring w 0 -1))) (list org-scheduled-string org-deadline-string org-clock-string org-closed-string))) (setq
> org-ota nil) (org-compute-latex-and-related-regexp))
> (progn (org-set-local (quote org-todo-kwd-alist) nil) (org-set-local (quote org-todo-key-alist) nil) (org-set-local (quote org-todo-key-trigger) nil) (org-set-local (quote
> org-todo-keywords-1) nil) (org-set-local (quote org-done-keywords) nil) (org-set-local (quote org-todo-heads) nil) (org-set-local (quote org-todo-sets) nil) (org-set-local (quote
> org-todo-log-states) nil) (org-set-local (quote org-file-properties) nil) (let ((re (org-make-options-regexp (quote ("CATEGORY" "TODO" "COLUMNS" "STARTUP" "ARCHIVE" "LINK"
> "PRIORITIES" "CONSTANTS" "PROPERTY" "DRAWERS" "SETUPFILE" "OPTIONS")) "\\(?:[a-zA-Z][0-9a-zA-Z_]*_TODO\\)")) (splitre "[ ]+") (scripts org-use-sub-superscripts) kwds kws0 kwsa key
> log value cat arch const links hw dws tail sep kws1 prio props drawers ext-setup-or-nil setup-contents (start 0)) (save-excursion (save-restriction (widen) (goto-char (point-min))
> (while (or (and ext-setup-or-nil (not org-ota) (let ... ... ...)) (and ext-setup-or-nil (string-match re ext-setup-or-nil start) (setq start ...)) (and (setq ext-setup-or-nil nil
> start 0) (re-search-forward re nil t))) (setq key (upcase (match-string 1 ext-setup-or-nil)) value (org-match-string-no-properties 2 ext-setup-or-nil)) (if (stringp value) (setq
> value (org-trim value))) (cond ((equal key "CATEGORY") (setq cat value)) ((member key ...) (setq kwds ...)) ((equal key "TYP_TODO") (setq kwds ...)) ((string-match
> "\\`\\([a-zA-Z][0-9a-zA-Z_]*\\)_TODO\\'" key) (setq kwds ...)) ((equal key "COLUMNS") (org-set-local ... value)) ((equal key "LINK") (if ... ...)) ((equal key "PRIORITIES") (setq
> prio ...)) ((equal key "PROPERTY") (if ... ...)) ((equal key "DRAWERS") (setq drawers ...)) ((equal key "CONSTANTS") (org-table-set-constants)) ((equal key "STARTUP") (let ...
> ...)) ((equal key "ARCHIVE") (setq arch value) (remove-text-properties 0 ... ... arch)) ((equal key "OPTIONS") (if ... ...)) ((and ... ...) (setq setup-contents ...) (if ... ...
> ...)))) (goto-char (point-min)) (while (re-search-forward org-block-regexp nil t) (if (equal "PROPERTY" (upcase ...)) (progn (setq value ...) (if ... ...)))))) (org-set-local
> (quote org-use-sub-superscripts) scripts) (if cat (progn (org-set-local (quote org-category) (intern cat)) (setq props (cons (cons "CATEGORY" cat) props)))) (if prio (progn (if (<
> (length prio) 3) (setq prio (quote ("A" "C" "B")))) (setq prio (mapcar (quote string-to-char) prio)) (org-set-local (quote org-highest-priority) (nth 0 prio)) (org-set-local (quote
> org-lowest-priority) (nth 1 prio)) (org-set-local (quote org-default-priority) (nth 2 prio)))) (and props (org-set-local (quote org-file-properties) (nreverse props))) (and drawers
> (org-set-local (quote org-drawers) drawers)) (and arch (org-set-local (quote org-archive-location) arch)) (and links (setq org-link-abbrev-alist-local (nreverse links))) (if kwds
> nil (setq kwds (default-value (quote org-todo-keywords))) (if (stringp (car kwds)) (setq kwds (list (cons org-todo-interpretation (default-value ...))))) (setq kwds (reverse
> kwds))) (setq kwds (nreverse kwds)) (let (inter kws kw) (while (setq kws (car (prog1 kwds (setq kwds ...)))) (let ((kws (or ... kws))) (setq inter (car (prog1 kws ...)) sep (member
> "|" kws) kws0 (delete "|" (copy-sequence kws)) kwsa nil kws1 (mapcar (function ...) kws0) kwsa (if kwsa (append ... ... ...)) hw (car kws1) dws (if sep (org-remove-keyword-keys
> ...) (last kws1)) tail (list inter hw (car dws) (org-last dws)))) (add-to-list (quote org-todo-heads) hw (quote append)) (setq org-todo-sets (cons kws1 org-todo-sets)) (setq
> org-done-keywords (append org-done-keywords dws nil)) (setq org-todo-key-alist (append org-todo-key-alist kwsa)) (mapc (function (lambda (x) (setq org-todo-kwd-alist ...))) kws1)
> (setq org-todo-keywords-1 (append org-todo-keywords-1 kws1 nil))) (setq org-todo-sets (nreverse org-todo-sets) org-todo-kwd-alist (nreverse org-todo-kwd-alist) org-todo-key-trigger
> (delq nil (mapcar (quote cdr) org-todo-key-alist)) org-todo-key-alist (org-assign-fast-keys org-todo-key-alist))) (if (not org-done-keywords) (setq org-done-keywords (and
> org-todo-keywords-1 (list (org-last org-todo-keywords-1))))) (setq org-ds-keyword-length (+ 2 (max (length org-deadline-string) (length org-scheduled-string) (length
> org-clock-string) (length org-closed-string))) org-drawer-regexp (concat "^[ ]*:\\(" (mapconcat (quote regexp-quote) org-drawers "\\|") "\\):[ ]*$") org-not-done-keywords
> (org-delete-all org-done-keywords (copy-sequence org-todo-keywords-1)) org-todo-regexp (concat "\\(" (mapconcat (quote regexp-quote) org-todo-keywords-1 "\\|") "\\)")
> org-not-done-regexp (concat "\\(" (mapconcat (quote regexp-quote) org-not-done-keywords "\\|") "\\)") org-not-done-heading-regexp (format org-heading-keyword-regexp-format
> org-not-done-regexp) org-todo-line-regexp (format org-heading-keyword-maybe-regexp-format org-todo-regexp) org-complex-heading-regexp (concat "^\\(\\*+\\)" "\\(?: +"
> org-todo-regexp "\\)?" "\\(?: +\\(\\[#.\\]\\)\\)?" "\\(?: +\\(.*?\\)\\)??" "\\(?:[ ]+\\(:[[:alnum:]_@#%:]+:\\)\\)?" "[ ]*$") org-complex-heading-regexp-format (concat
> "^\\(\\*+\\)" "\\(?: +" org-todo-regexp "\\)?" "\\(?: +\\(\\[#.\\]\\)\\)?" "\\(?: +" "\\(?:\\[[0-9%%/]+\\] *\\)?" "\\(%s\\)" "\\(?: *\\[[0-9%%/]+\\]\\)?" "\\)" "\\(?:[
> ]+\\(:[[:alnum:]_@#%%:]+:\\)\\)?" "[ ]*$") org-todo-line-tags-regexp (concat "^\\(\\*+\\)" "\\(?: +" org-todo-regexp "\\)?" "\\(?: +\\(.*?\\)\\)??" "\\(?:[
> ]+\\(:[[:alnum:]:_@#%]+:\\)\\)?" "[ ]*$") org-deadline-regexp (concat "\\<" org-deadline-string) org-deadline-time-regexp (concat "\\<" org-deadline-string " *<\\([^>]+\\)>")
> org-deadline-time-hour-regexp (concat "\\<" org-deadline-string " *<\\([^>]+[0-9]\\{1,2\\}:[0-9]\\{2\\}[0-9-+:hdwmy .]*\\)>") org-deadline-line-regexp (concat "\\<\\("
> org-deadline-string "\\).*") org-scheduled-regexp (concat "\\<" org-scheduled-string) org-scheduled-time-regexp (concat "\\<" org-scheduled-string " *<\\([^>]+\\)>")
> org-scheduled-time-hour-regexp (concat "\\<" org-scheduled-string " *<\\([^>]+[0-9]\\{1,2\\}:[0-9]\\{2\\}[0-9-+:hdwmy .]*\\)>") org-closed-time-regexp (concat "\\<"
> org-closed-string " *\\[\\([^]]+\\)\\]") org-keyword-time-regexp (concat "\\<\\(" org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\|" org-clock-string
> "\\)" " *[[<]\\([^]>]+\\)[]>]") org-keyword-time-not-clock-regexp (concat "\\<\\(" org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\)" "
> *[[<]\\([^]>]+\\)[]>]") org-maybe-keyword-time-regexp (concat "\\(\\<\\(" org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\|" org-clock-string "\\)\\)?" "
> *\\([[<][0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\} ?[^]
> \n>]*?[]>]\\|<%%([^
> \n>]*>\\)") org-all-time-keywords (mapcar (function (lambda (w) (substring w 0 -1))) (list org-scheduled-string org-deadline-string org-clock-string org-closed-string))) (setq
> org-ota nil) (org-compute-latex-and-related-regexp)))
> (if (derived-mode-p (quote org-mode)) (progn (org-set-local (quote org-todo-kwd-alist) nil) (org-set-local (quote org-todo-key-alist) nil) (org-set-local (quote
> org-todo-key-trigger) nil) (org-set-local (quote org-todo-keywords-1) nil) (org-set-local (quote org-done-keywords) nil) (org-set-local (quote org-todo-heads) nil) (org-set-local
> (quote org-todo-sets) nil) (org-set-local (quote org-todo-log-states) nil) (org-set-local (quote org-file-properties) nil) (let ((re (org-make-options-regexp (quote ("CATEGORY"
> "TODO" "COLUMNS" "STARTUP" "ARCHIVE" "LINK" "PRIORITIES" "CONSTANTS" "PROPERTY" "DRAWERS" "SETUPFILE" "OPTIONS")) "\\(?:[a-zA-Z][0-9a-zA-Z_]*_TODO\\)")) (splitre "[ ]+") (scripts
> org-use-sub-superscripts) kwds kws0 kwsa key log value cat arch const links hw dws tail sep kws1 prio props drawers ext-setup-or-nil setup-contents (start 0)) (save-excursion
> (save-restriction (widen) (goto-char (point-min)) (while (or (and ext-setup-or-nil ... ...) (and ext-setup-or-nil ... ...) (and ... ...)) (setq key (upcase ...) value
> (org-match-string-no-properties 2 ext-setup-or-nil)) (if (stringp value) (setq value ...)) (cond (... ...) (... ...) (... ...) (... ...) (... ...) (... ...) (... ...) (... ...)
> (... ...) (... ...) (... ...) (... ... ...) (... ...) (... ... ...))) (goto-char (point-min)) (while (re-search-forward org-block-regexp nil t) (if (equal "PROPERTY" ...) (progn
> ... ...))))) (org-set-local (quote org-use-sub-superscripts) scripts) (if cat (progn (org-set-local (quote org-category) (intern cat)) (setq props (cons (cons "CATEGORY" cat)
> props)))) (if prio (progn (if (< (length prio) 3) (setq prio (quote ...))) (setq prio (mapcar (quote string-to-char) prio)) (org-set-local (quote org-highest-priority) (nth 0
> prio)) (org-set-local (quote org-lowest-priority) (nth 1 prio)) (org-set-local (quote org-default-priority) (nth 2 prio)))) (and props (org-set-local (quote org-file-properties)
> (nreverse props))) (and drawers (org-set-local (quote org-drawers) drawers)) (and arch (org-set-local (quote org-archive-location) arch)) (and links (setq
> org-link-abbrev-alist-local (nreverse links))) (if kwds nil (setq kwds (default-value (quote org-todo-keywords))) (if (stringp (car kwds)) (setq kwds (list (cons
> org-todo-interpretation ...)))) (setq kwds (reverse kwds))) (setq kwds (nreverse kwds)) (let (inter kws kw) (while (setq kws (car (prog1 kwds ...))) (let ((kws ...)) (setq inter
> (car ...) sep (member "|" kws) kws0 (delete "|" ...) kwsa nil kws1 (mapcar ... kws0) kwsa (if kwsa ...) hw (car kws1) dws (if sep ... ...) tail (list inter hw ... ...)))
> (add-to-list (quote org-todo-heads) hw (quote append)) (setq org-todo-sets (cons kws1 org-todo-sets)) (setq org-done-keywords (append org-done-keywords dws nil)) (setq
> org-todo-key-alist (append org-todo-key-alist kwsa)) (mapc (function (lambda ... ...)) kws1) (setq org-todo-keywords-1 (append org-todo-keywords-1 kws1 nil))) (setq org-todo-sets
> (nreverse org-todo-sets) org-todo-kwd-alist (nreverse org-todo-kwd-alist) org-todo-key-trigger (delq nil (mapcar (quote cdr) org-todo-key-alist)) org-todo-key-alist
> (org-assign-fast-keys org-todo-key-alist))) (if (not org-done-keywords) (setq org-done-keywords (and org-todo-keywords-1 (list (org-last org-todo-keywords-1))))) (setq
> org-ds-keyword-length (+ 2 (max (length org-deadline-string) (length org-scheduled-string) (length org-clock-string) (length org-closed-string))) org-drawer-regexp (concat "^[
> ]*:\\(" (mapconcat (quote regexp-quote) org-drawers "\\|") "\\):[ ]*$") org-not-done-keywords (org-delete-all org-done-keywords (copy-sequence org-todo-keywords-1))
> org-todo-regexp (concat "\\(" (mapconcat (quote regexp-quote) org-todo-keywords-1 "\\|") "\\)") org-not-done-regexp (concat "\\(" (mapconcat (quote regexp-quote)
> org-not-done-keywords "\\|") "\\)") org-not-done-heading-regexp (format org-heading-keyword-regexp-format org-not-done-regexp) org-todo-line-regexp (format
> org-heading-keyword-maybe-regexp-format org-todo-regexp) org-complex-heading-regexp (concat "^\\(\\*+\\)" "\\(?: +" org-todo-regexp "\\)?" "\\(?: +\\(\\[#.\\]\\)\\)?" "\\(?:
> +\\(.*?\\)\\)??" "\\(?:[ ]+\\(:[[:alnum:]_@#%:]+:\\)\\)?" "[ ]*$") org-complex-heading-regexp-format (concat "^\\(\\*+\\)" "\\(?: +" org-todo-regexp "\\)?" "\\(?:
> +\\(\\[#.\\]\\)\\)?" "\\(?: +" "\\(?:\\[[0-9%%/]+\\] *\\)?" "\\(%s\\)" "\\(?: *\\[[0-9%%/]+\\]\\)?" "\\)" "\\(?:[ ]+\\(:[[:alnum:]_@#%%:]+:\\)\\)?" "[ ]*$")
> org-todo-line-tags-regexp (concat "^\\(\\*+\\)" "\\(?: +" org-todo-regexp "\\)?" "\\(?: +\\(.*?\\)\\)??" "\\(?:[ ]+\\(:[[:alnum:]:_@#%]+:\\)\\)?" "[ ]*$") org-deadline-regexp
> (concat "\\<" org-deadline-string) org-deadline-time-regexp (concat "\\<" org-deadline-string " *<\\([^>]+\\)>") org-deadline-time-hour-regexp (concat "\\<" org-deadline-string "
> *<\\([^>]+[0-9]\\{1,2\\}:[0-9]\\{2\\}[0-9-+:hdwmy .]*\\)>") org-deadline-line-regexp (concat "\\<\\(" org-deadline-string "\\).*") org-scheduled-regexp (concat "\\<"
> org-scheduled-string) org-scheduled-time-regexp (concat "\\<" org-scheduled-string " *<\\([^>]+\\)>") org-scheduled-time-hour-regexp (concat "\\<" org-scheduled-string "
> *<\\([^>]+[0-9]\\{1,2\\}:[0-9]\\{2\\}[0-9-+:hdwmy .]*\\)>") org-closed-time-regexp (concat "\\<" org-closed-string " *\\[\\([^]]+\\)\\]") org-keyword-time-regexp (concat "\\<\\("
> org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\|" org-clock-string "\\)" " *[[<]\\([^]>]+\\)[]>]") org-keyword-time-not-clock-regexp (concat "\\<\\("
> org-scheduled-string "\\|" org-deadline-string "\\|" org-closed-string "\\)" " *[[<]\\([^]>]+\\)[]>]") org-maybe-keyword-time-regexp (concat "\\(\\<\\(" org-scheduled-string "\\|"
> org-deadline-string "\\|" org-closed-string "\\|" org-clock-string "\\)\\)?" " *\\([[<][0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\} ?[^]
> \n>]*?[]>]\\|<%%([^
> \n>]*>\\)") org-all-time-keywords (mapcar (function (lambda (w) (substring w 0 -1))) (list org-scheduled-string org-deadline-string org-clock-string org-closed-string))) (setq
> org-ota nil) (org-compute-latex-and-related-regexp))))
> org-set-regexps-and-options()
> (let ((delay-mode-hooks t)) (outline-mode) (setq major-mode (quote org-mode)) (setq mode-name "Org") (progn (if (get (quote outline-mode) (quote mode-class)) (put (quote
> org-mode) (quote mode-class) (get (quote outline-mode) (quote mode-class)))) (if (keymap-parent org-mode-map) nil (set-keymap-parent org-mode-map (current-local-map))) (let
> ((parent (char-table-parent org-mode-syntax-table))) (if (and parent (not (eq parent (standard-syntax-table)))) nil (set-char-table-parent org-mode-syntax-table (syntax-table))))
> (if (or (abbrev-table-get org-mode-abbrev-table :parents) (eq org-mode-abbrev-table local-abbrev-table)) nil (abbrev-table-put org-mode-abbrev-table :parents (list
> local-abbrev-table)))) (use-local-map org-mode-map) (set-syntax-table org-mode-syntax-table) (setq local-abbrev-table org-mode-abbrev-table) (if (featurep (quote xemacs)) (if
> (boundp (quote outline-mode-menu-heading)) (progn (easy-menu-remove outline-mode-menu-heading) (easy-menu-remove outline-mode-menu-show) (easy-menu-remove outline-mode-menu-hide)))
> (define-key org-mode-map [menu-bar headings] (quote undefined)) (define-key org-mode-map [menu-bar hide] (quote undefined)) (define-key org-mode-map [menu-bar show] (quote
> undefined))) (org-load-modules-maybe) (easy-menu-add org-org-menu) (easy-menu-add org-tbl-menu) (org-install-agenda-files-menu) (if org-descriptive-links (add-to-invisibility-spec
> (quote (org-link)))) (add-to-invisibility-spec (quote (org-cwidth))) (add-to-invisibility-spec (quote (org-hide-block . t))) (if (featurep (quote xemacs)) (progn (org-set-local
> (quote line-move-ignore-invisible) t))) (org-set-local (quote outline-regexp) org-outline-regexp) (org-set-local (quote outline-level) (quote org-outline-level)) (setq
> bidi-paragraph-direction (quote left-to-right)) (if (and org-ellipsis (fboundp (quote set-display-table-slot)) (boundp (quote buffer-display-table)) (fboundp (quote
> make-glyph-code))) (progn (if org-display-table nil (setq org-display-table (make-display-table))) (set-display-table-slot org-display-table 4 (vconcat (mapcar (function (lambda
> ... ...)) (if (stringp org-ellipsis) org-ellipsis "...")))) (setq buffer-display-table org-display-table))) (org-set-regexps-and-options-for-tags) (org-set-regexps-and-options)
> (org-set-font-lock-defaults) (if (and org-tag-faces (not org-tags-special-faces-re)) (progn (org-set-tag-faces (quote org-tag-faces) org-tag-faces))) (org-set-local (quote
> calc-embedded-open-mode) "# ") (modify-syntax-entry 64 "w") (modify-syntax-entry 34 "\"") (if org-startup-truncated (setq truncate-lines t)) (if org-startup-indented (progn
> (require (quote org-indent)) (org-indent-mode 1))) (org-set-local (quote font-lock-unfontify-region-function) (quote org-unfontify-region)) (org-set-local (quote
> org-table-may-need-update) t) (org-add-hook (quote before-change-functions) (quote org-before-change-function) nil (quote local)) (org-add-hook (quote kill-buffer-hook) (quote
> org-check-running-clock) nil (quote local)) (org-macro-initialize-templates) (org-update-radio-target-regexp) (org-set-local (quote indent-line-function) (quote org-indent-line))
> (org-set-local (quote indent-region-function) (quote org-indent-region)) (org-setup-filling) (org-setup-comments-handling) (org-set-local (quote beginning-of-defun-function) (quote
> org-backward-element)) (org-set-local (quote end-of-defun-function) (quote org-forward-element)) (org-set-local (quote next-error-function) (quote org-occur-next-match)) (if
> org-enforce-todo-dependencies (add-hook (quote org-blocker-hook) (quote org-block-todo-from-children-or-siblings-or-parent)) (remove-hook (quote org-blocker-hook) (quote
> org-block-todo-from-children-or-siblings-or-parent))) (if org-enforce-todo-checkbox-dependencies (add-hook (quote org-blocker-hook) (quote org-block-todo-from-checkboxes))
> (remove-hook (quote org-blocker-hook) (quote org-block-todo-from-checkboxes))) (org-set-local (quote align-mode-rules-list) (quote ((org-in-buffer-settings (regexp .
> "^#\\+[A-Z_]+:\\(\\s-*\\)\\S-+") (modes quote (org-mode)))))) (org-set-local (quote imenu-create-index-function) (quote org-imenu-get-tree)) (if (or (featurep (quote xemacs)) (not
> (boundp (quote outline-isearch-open-invisible-function)))) (org-add-hook (quote isearch-mode-end-hook) (quote org-isearch-end) (quote append) (quote local)) (org-set-local (quote
> outline-isearch-open-invisible-function) (function (lambda (&rest ignore) (org-show-context (quote isearch))))) (org-add-hook (quote isearch-mode-end-hook) (quote
> org-fix-ellipsis-at-bol) (quote append) (quote local))) (set (make-local-variable (quote pcomplete-command-completion-function)) (quote org-pcomplete-initial)) ...)
> (progn (make-local-variable (quote delay-mode-hooks)) (let ((delay-mode-hooks t)) (outline-mode) (setq major-mode (quote org-mode)) (setq mode-name "Org") (progn (if (get (quote
> outline-mode) (quote mode-class)) (put (quote org-mode) (quote mode-class) (get (quote outline-mode) (quote mode-class)))) (if (keymap-parent org-mode-map) nil (set-keymap-parent
> org-mode-map (current-local-map))) (let ((parent (char-table-parent org-mode-syntax-table))) (if (and parent (not (eq parent ...))) nil (set-char-table-parent org-mode-syntax-table
> (syntax-table)))) (if (or (abbrev-table-get org-mode-abbrev-table :parents) (eq org-mode-abbrev-table local-abbrev-table)) nil (abbrev-table-put org-mode-abbrev-table :parents
> (list local-abbrev-table)))) (use-local-map org-mode-map) (set-syntax-table org-mode-syntax-table) (setq local-abbrev-table org-mode-abbrev-table) (if (featurep (quote xemacs)) (if
> (boundp (quote outline-mode-menu-heading)) (progn (easy-menu-remove outline-mode-menu-heading) (easy-menu-remove outline-mode-menu-show) (easy-menu-remove outline-mode-menu-hide)))
> (define-key org-mode-map [menu-bar headings] (quote undefined)) (define-key org-mode-map [menu-bar hide] (quote undefined)) (define-key org-mode-map [menu-bar show] (quote
> undefined))) (org-load-modules-maybe) (easy-menu-add org-org-menu) (easy-menu-add org-tbl-menu) (org-install-agenda-files-menu) (if org-descriptive-links (add-to-invisibility-spec
> (quote (org-link)))) (add-to-invisibility-spec (quote (org-cwidth))) (add-to-invisibility-spec (quote (org-hide-block . t))) (if (featurep (quote xemacs)) (progn (org-set-local
> (quote line-move-ignore-invisible) t))) (org-set-local (quote outline-regexp) org-outline-regexp) (org-set-local (quote outline-level) (quote org-outline-level)) (setq
> bidi-paragraph-direction (quote left-to-right)) (if (and org-ellipsis (fboundp (quote set-display-table-slot)) (boundp (quote buffer-display-table)) (fboundp (quote
> make-glyph-code))) (progn (if org-display-table nil (setq org-display-table (make-display-table))) (set-display-table-slot org-display-table 4 (vconcat (mapcar (function ...) (if
> ... org-ellipsis "...")))) (setq buffer-display-table org-display-table))) (org-set-regexps-and-options-for-tags) (org-set-regexps-and-options) (org-set-font-lock-defaults) (if
> (and org-tag-faces (not org-tags-special-faces-re)) (progn (org-set-tag-faces (quote org-tag-faces) org-tag-faces))) (org-set-local (quote calc-embedded-open-mode) "# ")
> (modify-syntax-entry 64 "w") (modify-syntax-entry 34 "\"") (if org-startup-truncated (setq truncate-lines t)) (if org-startup-indented (progn (require (quote org-indent))
> (org-indent-mode 1))) (org-set-local (quote font-lock-unfontify-region-function) (quote org-unfontify-region)) (org-set-local (quote org-table-may-need-update) t) (org-add-hook
> (quote before-change-functions) (quote org-before-change-function) nil (quote local)) (org-add-hook (quote kill-buffer-hook) (quote org-check-running-clock) nil (quote local))
> (org-macro-initialize-templates) (org-update-radio-target-regexp) (org-set-local (quote indent-line-function) (quote org-indent-line)) (org-set-local (quote indent-region-function)
> (quote org-indent-region)) (org-setup-filling) (org-setup-comments-handling) (org-set-local (quote beginning-of-defun-function) (quote org-backward-element)) (org-set-local (quote
> end-of-defun-function) (quote org-forward-element)) (org-set-local (quote next-error-function) (quote org-occur-next-match)) (if org-enforce-todo-dependencies (add-hook (quote
> org-blocker-hook) (quote org-block-todo-from-children-or-siblings-or-parent)) (remove-hook (quote org-blocker-hook) (quote org-block-todo-from-children-or-siblings-or-parent))) (if
> org-enforce-todo-checkbox-dependencies (add-hook (quote org-blocker-hook) (quote org-block-todo-from-checkboxes)) (remove-hook (quote org-blocker-hook) (quote
> org-block-todo-from-checkboxes))) (org-set-local (quote align-mode-rules-list) (quote ((org-in-buffer-settings (regexp . "^#\\+[A-Z_]+:\\(\\s-*\\)\\S-+") (modes quote
> (org-mode)))))) (org-set-local (quote imenu-create-index-function) (quote org-imenu-get-tree)) (if (or (featurep (quote xemacs)) (not (boundp (quote
> outline-isearch-open-invisible-function)))) (org-add-hook (quote isearch-mode-end-hook) (quote org-isearch-end) (quote append) (quote local)) (org-set-local (quote
> outline-isearch-open-invisible-function) (function (lambda (&rest ignore) (org-show-context (quote isearch))))) (org-add-hook (quote isearch-mode-end-hook) (quote
> org-fix-ellipsis-at-bol) (quote append) (quote local))) (set (make-local-variable (quote pcomplete-command-completion-function)) (quote org-pcomplete-initial)) ...))
> org-mode()
> set-auto-mode-0(org-mode nil)
> set-auto-mode()
> normal-mode(t)
> after-find-file(nil t)
> find-file-noselect-1(#<buffer Lernen - Wissen - Dokus - Info - Lics Fortbildung etc.org> "~/org/DIPLAN/Lernen - Wissen - Dokus - Info - Lics Fortbildung etc.org" nil nil
> "~/org/DIPLAN/Lernen - Wissen - Dokus - Info - Lics Fortbildung etc.org" ((378368 0 . 32277) (39125 . 52227)))
> find-file-noselect("~/org/DIPLAN/Lernen - Wissen - Dokus - Info - Lics Fortbildung etc.org")
> (setq buf (find-file-noselect file))
> (if buf buf (setq buf (find-file-noselect file)) (if buf (setq org-agenda-new-buffers (cons buf org-agenda-new-buffers))) buf)
> (let ((buf (org-find-base-buffer-visiting file))) (if buf buf (setq buf (find-file-noselect file)) (if buf (setq org-agenda-new-buffers (cons buf org-agenda-new-buffers))) buf))
> org-get-agenda-file-buffer("~/org/DIPLAN/Lernen - Wissen - Dokus - Info - Lics Fortbildung etc.org")
>
>
>
next prev parent reply other threads:[~2013-07-04 13:43 UTC|newest]
Thread overview: 10+ messages / expand[flat|nested] mbox.gz Atom feed top
2013-07-04 13:35 Lisp error when starting agenda Rainer Stengele
2013-07-04 13:43 ` Rainer Stengele [this message]
2013-07-04 14:07 ` Bastien
2013-07-04 14:08 ` Rainer Stengele
2013-07-04 14:11 ` Bastien
2013-07-04 14:49 ` Rainer Stengele
2013-07-04 15:12 ` Bastien
2013-07-04 19:07 ` Rainer Stengele
2013-07-04 20:15 ` Bastien
2013-07-04 20:25 ` Rainer Stengele
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=51D57BF2.7070301@online.de \
--to=rainer.stengele@online.de \
--cc=emacs-orgmode@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).