Backport commit 114323226 from Emacs
* lisp/ob-C.el (org-babel-prep-session:C) (org-babel-load-session:C): * lisp/ob-J.el (org-babel-execute:J): * lisp/ob-asymptote.el (org-babel-prep-session:asymptote): * lisp/ob-awk.el (org-babel-execute:awk): * lisp/ob-core.el (org-babel-process-file-name): * lisp/ob-ebnf.el (org-babel-execute:ebnf): * lisp/ob-forth.el (org-babel-execute:forth): * lisp/ob-fortran.el (org-babel-execute:fortran) (org-babel-prep-session:fortran, org-babel-load-session:fortran): * lisp/ob-groovy.el (org-babel-execute:groovy): * lisp/ob-io.el (org-babel-execute:io): * lisp/ob-js.el (org-babel-execute:js): * lisp/ob-lilypond.el (org-babel-default-header-args:lilypond) (org-babel-lilypond-compile-post-tangle) (org-babel-lilypond-display-pdf-post-tangle) (org-babel-lilypond-tangle) (org-babel-lilypond-execute-tangled-ly) (org-babel-lilypond-compile-lilyfile) (org-babel-lilypond-check-for-compile-error) (org-babel-lilypond-process-compile-error) (org-babel-lilypond-mark-error-line) (org-babel-lilypond-parse-error-line) (org-babel-lilypond-attempt-to-open-pdf) (org-babel-lilypond-attempt-to-play-midi) (org-babel-lilypond-switch-extension) (org-babel-lilypond-set-header-args): * lisp/ob-lua.el (org-babel-prep-session:lua): * lisp/ob-picolisp.el (org-babel-execute:picolisp): * lisp/ob-processing.el (org-babel-prep-session:processing): * lisp/ob-python.el (org-babel-prep-session:python): * lisp/ob-scheme.el (org-babel-scheme-capture-current-message) (org-babel-scheme-execute-with-geiser, org-babel-execute:scheme): * lisp/ob-shen.el (org-babel-execute:shen): * lisp/org-agenda.el (org-agenda-entry-types) (org-agenda-move-date-from-past-immediately-to-today) (org-agenda-time-grid, org-agenda-sorting-strategy) (org-agenda-filter-by-category, org-agenda-forward-block): * lisp/org-faces.el (org-verbatim, org-cycle-level-faces): * lisp/org-indent.el (org-indent-set-line-properties): * lisp/org-macs.el (org-get-limited-outline-regexp): * lisp/org-mobile.el (org-mobile-files): * lisp/org.el (org-use-fast-todo-selection) (org-extend-today-until, org-use-property-inheritance) (org-refresh-effort-properties) (org-track-ordered-property-with-tag, org-shiftright): * lisp/ox-html.el (org-html-checkbox-type): * lisp/ox-man.el (org-man-source-highlight) (org-man-verse-block): * lisp/ox-publish.el (org-publish-sitemap-default): Assorted docfixes. lisp/*.el: Fix typos and other trivial doc fixes 11432322650830fe9ae365f4113733a79226056d Juanma Barranquero Sat Sep 21 00:27:53 2019 +0200
This commit is contained in:
Juanma Barranquero
Kyle Meyer
parent
001306c1c0
commit
97feee0469
|
|
@ -297,12 +297,12 @@ its header arguments."
|
|||
|
||||
(defun org-babel-prep-session:C (_session _params)
|
||||
"This function does nothing as C is a compiled language with no
|
||||
support for sessions"
|
||||
support for sessions."
|
||||
(error "C is a compiled language -- no support for sessions"))
|
||||
|
||||
(defun org-babel-load-session:C (_session _body _params)
|
||||
"This function does nothing as C is a compiled language with no
|
||||
support for sessions"
|
||||
support for sessions."
|
||||
(error "C is a compiled language -- no support for sessions"))
|
||||
|
||||
;; helper functions
|
||||
|
|
|
|||
|
|
@ -72,7 +72,7 @@ PROCESSED-PARAMS isn't used yet."
|
|||
(defun org-babel-execute:J (body params)
|
||||
"Execute a block of J code BODY.
|
||||
PARAMS are given by org-babel.
|
||||
This function is called by `org-babel-execute-src-block'"
|
||||
This function is called by `org-babel-execute-src-block'."
|
||||
(message "executing J source code block")
|
||||
(let* ((processed-params (org-babel-process-params params))
|
||||
(sessionp (cdr (assq :session params)))
|
||||
|
|
|
|||
|
|
@ -77,7 +77,7 @@ This function is called by `org-babel-execute-src-block'."
|
|||
|
||||
(defun org-babel-prep-session:asymptote (_session _params)
|
||||
"Return an error if the :session header argument is set.
|
||||
Asymptote does not support sessions"
|
||||
Asymptote does not support sessions."
|
||||
(error "Asymptote does not support sessions"))
|
||||
|
||||
(defun org-babel-variable-assignments:asymptote (params)
|
||||
|
|
|
|||
|
|
@ -48,8 +48,8 @@
|
|||
body)
|
||||
|
||||
(defun org-babel-execute:awk (body params)
|
||||
"Execute a block of Awk code with org-babel. This function is
|
||||
called by `org-babel-execute-src-block'"
|
||||
"Execute a block of Awk code with org-babel.
|
||||
This function is called by `org-babel-execute-src-block'."
|
||||
(message "executing Awk source code block")
|
||||
(let* ((result-params (cdr (assq :result-params params)))
|
||||
(cmd-line (cdr (assq :cmd-line params)))
|
||||
|
|
|
|||
|
|
@ -2992,7 +2992,7 @@ If NAME specifies a remote location, the remote portion of the
|
|||
name is removed, since in that case the process will be executing
|
||||
remotely. The file name is then processed by `expand-file-name'.
|
||||
Unless second argument NO-QUOTE-P is non-nil, the file name is
|
||||
additionally processed by `shell-quote-argument'"
|
||||
additionally processed by `shell-quote-argument'."
|
||||
(let ((f (org-babel-local-file-name (expand-file-name name))))
|
||||
(if no-quote-p f (shell-quote-argument f))))
|
||||
|
||||
|
|
|
|||
|
|
@ -49,8 +49,8 @@
|
|||
;; Use ebnf-eps-buffer to produce an encapsulated postscript file.
|
||||
;;
|
||||
(defun org-babel-execute:ebnf (body params)
|
||||
"Execute a block of Ebnf code with org-babel. This function is
|
||||
called by `org-babel-execute-src-block'"
|
||||
"Execute a block of Ebnf code with org-babel.
|
||||
This function is called by `org-babel-execute-src-block'."
|
||||
(save-excursion
|
||||
(let* ((dest-file (cdr (assq :file params)))
|
||||
(dest-dir (file-name-directory dest-file))
|
||||
|
|
|
|||
|
|
@ -42,7 +42,7 @@
|
|||
|
||||
(defun org-babel-execute:forth (body params)
|
||||
"Execute a block of Forth code with org-babel.
|
||||
This function is called by `org-babel-execute-src-block'"
|
||||
This function is called by `org-babel-execute-src-block'."
|
||||
(if (string= "none" (cdr (assq :session params)))
|
||||
(error "Non-session evaluation not supported for Forth code blocks")
|
||||
(let ((all-results (org-babel-forth-session-execute body params)))
|
||||
|
|
|
|||
|
|
@ -45,7 +45,7 @@
|
|||
executable.")
|
||||
|
||||
(defun org-babel-execute:fortran (body params)
|
||||
"This function should only be called by `org-babel-execute:fortran'"
|
||||
"This function should only be called by `org-babel-execute:fortran'."
|
||||
(let* ((tmp-src-file (org-babel-temp-file "fortran-src-" ".F90"))
|
||||
(tmp-bin-file (org-babel-temp-file "fortran-bin-" org-babel-exeext))
|
||||
(cmdline (cdr (assq :cmdline params)))
|
||||
|
|
@ -114,12 +114,12 @@ its header arguments."
|
|||
|
||||
(defun org-babel-prep-session:fortran (_session _params)
|
||||
"This function does nothing as fortran is a compiled language with no
|
||||
support for sessions"
|
||||
support for sessions."
|
||||
(error "Fortran is a compiled languages -- no support for sessions"))
|
||||
|
||||
(defun org-babel-load-session:fortran (_session _body _params)
|
||||
"This function does nothing as fortran is a compiled language with no
|
||||
support for sessions"
|
||||
support for sessions."
|
||||
(error "Fortran is a compiled languages -- no support for sessions"))
|
||||
|
||||
;; helper functions
|
||||
|
|
|
|||
|
|
@ -45,8 +45,8 @@ parameters may be used, like groovy -v"
|
|||
:type 'string)
|
||||
|
||||
(defun org-babel-execute:groovy (body params)
|
||||
"Execute a block of Groovy code with org-babel. This function is
|
||||
called by `org-babel-execute-src-block'"
|
||||
"Execute a block of Groovy code with org-babel.
|
||||
This function is called by `org-babel-execute-src-block'."
|
||||
(message "executing Groovy source code block")
|
||||
(let* ((processed-params (org-babel-process-params params))
|
||||
(session (org-babel-groovy-initiate-session (nth 0 processed-params)))
|
||||
|
|
|
|||
|
|
@ -41,8 +41,8 @@
|
|||
"Name of the command to use for executing Io code.")
|
||||
|
||||
(defun org-babel-execute:io (body params)
|
||||
"Execute a block of Io code with org-babel. This function is
|
||||
called by `org-babel-execute-src-block'"
|
||||
"Execute a block of Io code with org-babel.
|
||||
This function is called by `org-babel-execute-src-block'."
|
||||
(message "executing Io source code block")
|
||||
(let* ((processed-params (org-babel-process-params params))
|
||||
(session (org-babel-io-initiate-session (nth 0 processed-params)))
|
||||
|
|
|
|||
|
|
@ -70,7 +70,7 @@
|
|||
|
||||
(defun org-babel-execute:js (body params)
|
||||
"Execute a block of Javascript code with org-babel.
|
||||
This function is called by `org-babel-execute-src-block'"
|
||||
This function is called by `org-babel-execute-src-block'."
|
||||
(let* ((org-babel-js-cmd (or (cdr (assq :cmd params)) org-babel-js-cmd))
|
||||
(session (cdr (assq :session params)))
|
||||
(result-type (cdr (assq :result-type params)))
|
||||
|
|
|
|||
|
|
@ -43,20 +43,20 @@
|
|||
(defvar org-babel-default-header-args:lilypond '()
|
||||
"Default header arguments for lilypond code blocks.
|
||||
NOTE: The arguments are determined at lilypond compile time.
|
||||
See (org-babel-lilypond-set-header-args)")
|
||||
See `org-babel-lilypond-set-header-args'.")
|
||||
|
||||
(defvar org-babel-lilypond-compile-post-tangle t
|
||||
"Following the org-babel-tangle (C-c C-v t) command,
|
||||
org-babel-lilypond-compile-post-tangle determines whether ob-lilypond should
|
||||
automatically attempt to compile the resultant tangled file.
|
||||
If the value is nil, no automated compilation takes place.
|
||||
Default value is t")
|
||||
Default value is t.")
|
||||
|
||||
(defvar org-babel-lilypond-display-pdf-post-tangle t
|
||||
"Following a successful LilyPond compilation
|
||||
org-babel-lilypond-display-pdf-post-tangle determines whether to automate the
|
||||
drawing / redrawing of the resultant pdf. If the value is nil,
|
||||
the pdf is not automatically redrawn. Default value is t")
|
||||
the pdf is not automatically redrawn. Default value is t.")
|
||||
|
||||
(defvar org-babel-lilypond-play-midi-post-tangle t
|
||||
"Following a successful LilyPond compilation
|
||||
|
|
@ -152,7 +152,7 @@ Depending on whether we are in arrange mode either:
|
|||
(defun org-babel-lilypond-tangle ()
|
||||
"ob-lilypond specific tangle, attempts to invoke
|
||||
=ly-execute-tangled-ly= if tangle is successful. Also passes
|
||||
specific arguments to =org-babel-tangle="
|
||||
specific arguments to =org-babel-tangle=."
|
||||
(interactive)
|
||||
(if (org-babel-tangle nil "yes" "lilypond")
|
||||
(org-babel-lilypond-execute-tangled-ly) nil))
|
||||
|
|
@ -189,7 +189,7 @@ specific arguments to =org-babel-tangle="
|
|||
|
||||
(defun org-babel-lilypond-execute-tangled-ly ()
|
||||
"Compile result of block tangle with lilypond.
|
||||
If error in compilation, attempt to mark the error in lilypond org file"
|
||||
If error in compilation, attempt to mark the error in lilypond org file."
|
||||
(when org-babel-lilypond-compile-post-tangle
|
||||
(let ((org-babel-lilypond-tangled-file (org-babel-lilypond-switch-extension
|
||||
(buffer-file-name) ".lilypond"))
|
||||
|
|
@ -212,8 +212,8 @@ If error in compilation, attempt to mark the error in lilypond org file"
|
|||
(org-babel-lilypond-attempt-to-play-midi org-babel-lilypond-temp-file)))))
|
||||
|
||||
(defun org-babel-lilypond-compile-lilyfile (file-name &optional test)
|
||||
"Compile lilypond file and check for compile errors
|
||||
FILE-NAME is full path to lilypond (.ly) file"
|
||||
"Compile lilypond file and check for compile errors.
|
||||
FILE-NAME is full path to lilypond (.ly) file."
|
||||
(message "Compiling LilyPond...")
|
||||
(let ((arg-1 org-babel-lilypond-ly-command) ;program
|
||||
(arg-2 nil) ;infile
|
||||
|
|
@ -239,7 +239,7 @@ This is performed by parsing the *lilypond* buffer
|
|||
containing the output message from the compilation.
|
||||
FILE-NAME is full path to lilypond file.
|
||||
If TEST is t just return nil if no error found, and pass
|
||||
nil as file-name since it is unused in this context"
|
||||
nil as file-name since it is unused in this context."
|
||||
(let ((is-error (search-forward "error:" nil t)))
|
||||
(if test
|
||||
is-error
|
||||
|
|
@ -248,7 +248,7 @@ nil as file-name since it is unused in this context"
|
|||
|
||||
(defun org-babel-lilypond-process-compile-error (file-name)
|
||||
"Process the compilation error that has occurred.
|
||||
FILE-NAME is full path to lilypond file"
|
||||
FILE-NAME is full path to lilypond file."
|
||||
(let ((line-num (org-babel-lilypond-parse-line-num)))
|
||||
(let ((error-lines (org-babel-lilypond-parse-error-line file-name line-num)))
|
||||
(org-babel-lilypond-mark-error-line file-name error-lines)
|
||||
|
|
@ -257,7 +257,7 @@ FILE-NAME is full path to lilypond file"
|
|||
(defun org-babel-lilypond-mark-error-line (file-name line)
|
||||
"Mark the erroneous lines in the lilypond org buffer.
|
||||
FILE-NAME is full path to lilypond file.
|
||||
LINE is the erroneous line"
|
||||
LINE is the erroneous line."
|
||||
(switch-to-buffer-other-window
|
||||
(concat (file-name-nondirectory
|
||||
(org-babel-lilypond-switch-extension file-name ".org"))))
|
||||
|
|
@ -288,9 +288,9 @@ LINE is the erroneous line"
|
|||
(and (numberp num) num)))))
|
||||
|
||||
(defun org-babel-lilypond-parse-error-line (file-name lineNo)
|
||||
"Extract the erroneous line from the tangled .ly file
|
||||
"Extract the erroneous line from the tangled .ly file.
|
||||
FILE-NAME is full path to lilypond file.
|
||||
LINENO is the number of the erroneous line"
|
||||
LINENO is the number of the erroneous line."
|
||||
(with-temp-buffer
|
||||
(insert-file-contents (org-babel-lilypond-switch-extension file-name ".ly")
|
||||
nil nil nil t)
|
||||
|
|
@ -302,9 +302,9 @@ LINENO is the number of the erroneous line"
|
|||
nil)))
|
||||
|
||||
(defun org-babel-lilypond-attempt-to-open-pdf (file-name &optional test)
|
||||
"Attempt to display the generated pdf file
|
||||
FILE-NAME is full path to lilypond file
|
||||
If TEST is non-nil, the shell command is returned and is not run"
|
||||
"Attempt to display the generated pdf file.
|
||||
FILE-NAME is full path to lilypond file.
|
||||
If TEST is non-nil, the shell command is returned and is not run."
|
||||
(when org-babel-lilypond-display-pdf-post-tangle
|
||||
(let ((pdf-file (org-babel-lilypond-switch-extension file-name ".pdf")))
|
||||
(if (file-exists-p pdf-file)
|
||||
|
|
@ -320,9 +320,9 @@ If TEST is non-nil, the shell command is returned and is not run"
|
|||
(message "No pdf file generated so can't display!")))))
|
||||
|
||||
(defun org-babel-lilypond-attempt-to-play-midi (file-name &optional test)
|
||||
"Attempt to play the generated MIDI file
|
||||
FILE-NAME is full path to lilypond file
|
||||
If TEST is non-nil, the shell command is returned and is not run"
|
||||
"Attempt to play the generated MIDI file.
|
||||
FILE-NAME is full path to lilypond file.
|
||||
If TEST is non-nil, the shell command is returned and is not run."
|
||||
(when org-babel-lilypond-play-midi-post-tangle
|
||||
(let ((midi-file (org-babel-lilypond-switch-extension file-name ".midi")))
|
||||
(if (file-exists-p midi-file)
|
||||
|
|
@ -385,14 +385,13 @@ If TEST is non-nil, the shell command is returned and is not run"
|
|||
(if org-babel-lilypond-arrange-mode "ENABLED." "DISABLED."))))
|
||||
|
||||
(defun org-babel-lilypond-switch-extension (file-name ext)
|
||||
"Utility command to swap current FILE-NAME extension with EXT"
|
||||
"Utility command to swap current FILE-NAME extension with EXT."
|
||||
(concat (file-name-sans-extension
|
||||
file-name) ext))
|
||||
|
||||
(defun org-babel-lilypond-get-header-args (mode)
|
||||
"Default arguments to use when evaluating a lilypond
|
||||
source block. These depend upon whether we are in arrange
|
||||
mode i.e. ARRANGE-MODE is t"
|
||||
"Default arguments to use when evaluating a lilypond source block.
|
||||
These depend upon whether we are in Arrange mode i.e. MODE is t."
|
||||
(cond (mode
|
||||
'((:tangle . "yes")
|
||||
(:noweb . "yes")
|
||||
|
|
@ -405,7 +404,7 @@ mode i.e. ARRANGE-MODE is t"
|
|||
|
||||
(defun org-babel-lilypond-set-header-args (mode)
|
||||
"Set org-babel-default-header-args:lilypond
|
||||
dependent on ORG-BABEL-LILYPOND-ARRANGE-MODE"
|
||||
dependent on ORG-BABEL-LILYPOND-ARRANGE-MODE."
|
||||
(setq org-babel-default-header-args:lilypond
|
||||
(org-babel-lilypond-get-header-args mode)))
|
||||
|
||||
|
|
|
|||
|
|
@ -100,7 +100,7 @@ This function is called by `org-babel-execute-src-block'."
|
|||
|
||||
(defun org-babel-prep-session:lua (session params)
|
||||
"Prepare SESSION according to the header arguments in PARAMS.
|
||||
VARS contains resolved variable references"
|
||||
VARS contains resolved variable references."
|
||||
(let* ((session (org-babel-lua-initiate-session session))
|
||||
(var-lines
|
||||
(org-babel-variable-assignments:lua params)))
|
||||
|
|
|
|||
|
|
@ -94,8 +94,8 @@
|
|||
body)))
|
||||
|
||||
(defun org-babel-execute:picolisp (body params)
|
||||
"Execute a block of Picolisp code with org-babel. This function is
|
||||
called by `org-babel-execute-src-block'"
|
||||
"Execute a block of Picolisp code with org-babel.
|
||||
This function is called by `org-babel-execute-src-block'."
|
||||
(message "executing Picolisp source code block")
|
||||
(let* (
|
||||
;; Name of the session or "none".
|
||||
|
|
|
|||
|
|
@ -135,7 +135,7 @@ This function is called by `org-babel-execute-src-block'."
|
|||
|
||||
(defun org-babel-prep-session:processing (_session _params)
|
||||
"Return an error if the :session header argument is set.
|
||||
Processing does not support sessions"
|
||||
Processing does not support sessions."
|
||||
(error "Processing does not support sessions"))
|
||||
|
||||
(defun org-babel-variable-assignments:processing (params)
|
||||
|
|
|
|||
|
|
@ -97,7 +97,7 @@ This function is called by `org-babel-execute-src-block'."
|
|||
|
||||
(defun org-babel-prep-session:python (session params)
|
||||
"Prepare SESSION according to the header arguments in PARAMS.
|
||||
VARS contains resolved variable references"
|
||||
VARS contains resolved variable references."
|
||||
(let* ((session (org-babel-python-initiate-session session))
|
||||
(var-lines
|
||||
(org-babel-variable-assignments:python params)))
|
||||
|
|
|
|||
|
|
@ -215,7 +215,7 @@ return the value of the last statement in BODY, as elisp."
|
|||
(let ((eoe-string (format "puts \"%s\"" org-babel-ruby-eoe-indicator)))
|
||||
;; Force the session to be ready before the actual session
|
||||
;; code is run. There is some problem in comint that will
|
||||
;; sometimes show the prompt after the the input has already
|
||||
;; sometimes show the prompt after the input has already
|
||||
;; been inserted and that throws off the extraction of the
|
||||
;; result for Babel.
|
||||
(org-babel-comint-with-output
|
||||
|
|
|
|||
|
|
@ -131,7 +131,7 @@ org-babel-scheme-execute-with-geiser will use a temporary session."
|
|||
(name)))
|
||||
|
||||
(defmacro org-babel-scheme-capture-current-message (&rest body)
|
||||
"Capture current message in both interactive and noninteractive mode"
|
||||
"Capture current message in both interactive and noninteractive mode."
|
||||
`(if noninteractive
|
||||
(let ((original-message (symbol-function 'message))
|
||||
(current-message nil))
|
||||
|
|
@ -147,10 +147,11 @@ org-babel-scheme-execute-with-geiser will use a temporary session."
|
|||
(current-message))))
|
||||
|
||||
(defun org-babel-scheme-execute-with-geiser (code output impl repl)
|
||||
"Execute code in specified REPL. If the REPL doesn't exist, create it
|
||||
using the given scheme implementation.
|
||||
"Execute code in specified REPL.
|
||||
If the REPL doesn't exist, create it using the given scheme
|
||||
implementation.
|
||||
|
||||
Returns the output of executing the code if the output parameter
|
||||
Returns the output of executing the code if the OUTPUT parameter
|
||||
is true; otherwise returns the last value."
|
||||
(let ((result nil))
|
||||
(with-temp-buffer
|
||||
|
|
@ -198,7 +199,7 @@ Emacs-lisp table, otherwise return the results as a string."
|
|||
|
||||
(defun org-babel-execute:scheme (body params)
|
||||
"Execute a block of Scheme code with org-babel.
|
||||
This function is called by `org-babel-execute-src-block'"
|
||||
This function is called by `org-babel-execute-src-block'."
|
||||
(let* ((source-buffer (current-buffer))
|
||||
(source-buffer-name (replace-regexp-in-string ;; zap surrounding *
|
||||
"^ ?\\*\\([^*]+\\)\\*" "\\1"
|
||||
|
|
|
|||
|
|
@ -61,7 +61,7 @@
|
|||
|
||||
(defun org-babel-execute:shen (body params)
|
||||
"Execute a block of Shen code with org-babel.
|
||||
This function is called by `org-babel-execute-src-block'"
|
||||
This function is called by `org-babel-execute-src-block'."
|
||||
(require 'inf-shen)
|
||||
(let* ((result-params (cdr (assq :result-params params)))
|
||||
(full-body (org-babel-expand-body:shen body params)))
|
||||
|
|
|
|||
|
|
@ -267,7 +267,7 @@ you can \"misuse\" it to also add other text to the header."
|
|||
"List of types searched for when creating the daily/weekly agenda.
|
||||
This variable is a list of symbols that controls the types of
|
||||
items that appear in the daily/weekly agenda. Allowed symbols in this
|
||||
list are are
|
||||
list are
|
||||
|
||||
:timestamp List items containing a date stamp or date range matching
|
||||
the selected date. This includes sexp entries in angular
|
||||
|
|
@ -1225,7 +1225,7 @@ These days get the special face `org-agenda-date-weekend' in the agenda."
|
|||
|
||||
(defcustom org-agenda-move-date-from-past-immediately-to-today t
|
||||
"Non-nil means jump to today when moving a past date forward in time.
|
||||
When using S-right in the agenda to move a a date forward, and the date
|
||||
When using S-right in the agenda to move a date forward, and the date
|
||||
stamp currently points to the past, the first key press will move it
|
||||
to today. When nil, just move one day forward even if the date stays
|
||||
in the past."
|
||||
|
|
@ -1498,7 +1498,7 @@ The third item is a string which will be placed right after the
|
|||
times that have a grid line.
|
||||
|
||||
The fourth item is a string placed after the grid times. This
|
||||
will align with agenda items"
|
||||
will align with agenda items."
|
||||
:group 'org-agenda-time-grid
|
||||
:type
|
||||
'(list
|
||||
|
|
@ -1542,18 +1542,18 @@ This is a list of symbols which will be used in sequence to determine
|
|||
if an entry should be listed before another entry. The following
|
||||
symbols are recognized:
|
||||
|
||||
time-up Put entries with time-of-day indications first, early first
|
||||
time-down Put entries with time-of-day indications first, late first
|
||||
timestamp-up Sort by any timestamp, early first
|
||||
timestamp-down Sort by any timestamp, late first
|
||||
scheduled-up Sort by scheduled timestamp, early first
|
||||
scheduled-down Sort by scheduled timestamp, late first
|
||||
deadline-up Sort by deadline timestamp, early first
|
||||
deadline-down Sort by deadline timestamp, late first
|
||||
ts-up Sort by active timestamp, early first
|
||||
ts-down Sort by active timestamp, late first
|
||||
tsia-up Sort by inactive timestamp, early first
|
||||
tsia-down Sort by inactive timestamp, late first
|
||||
time-up Put entries with time-of-day indications first, early first.
|
||||
time-down Put entries with time-of-day indications first, late first.
|
||||
timestamp-up Sort by any timestamp, early first.
|
||||
timestamp-down Sort by any timestamp, late first.
|
||||
scheduled-up Sort by scheduled timestamp, early first.
|
||||
scheduled-down Sort by scheduled timestamp, late first.
|
||||
deadline-up Sort by deadline timestamp, early first.
|
||||
deadline-down Sort by deadline timestamp, late first.
|
||||
ts-up Sort by active timestamp, early first.
|
||||
ts-down Sort by active timestamp, late first.
|
||||
tsia-up Sort by inactive timestamp, early first.
|
||||
tsia-down Sort by inactive timestamp, late first.
|
||||
category-keep Keep the default order of categories, corresponding to the
|
||||
sequence in `org-agenda-files'.
|
||||
category-up Sort alphabetically by category, A-Z.
|
||||
|
|
@ -1568,10 +1568,10 @@ effort-up Sort numerically by estimated effort, high effort last.
|
|||
effort-down Sort numerically by estimated effort, high effort first.
|
||||
user-defined-up Sort according to `org-agenda-cmp-user-defined', high last.
|
||||
user-defined-down Sort according to `org-agenda-cmp-user-defined', high first.
|
||||
habit-up Put entries that are habits first
|
||||
habit-down Put entries that are habits last
|
||||
alpha-up Sort headlines alphabetically
|
||||
alpha-down Sort headlines alphabetically, reversed
|
||||
habit-up Put entries that are habits first.
|
||||
habit-down Put entries that are habits last.
|
||||
alpha-up Sort headlines alphabetically.
|
||||
alpha-down Sort headlines alphabetically, reversed.
|
||||
|
||||
The different possibilities will be tried in sequence, and testing stops
|
||||
if one comparison returns a \"not-equal\". For example, the default
|
||||
|
|
@ -7394,8 +7394,7 @@ With a prefix argument, do so in all agenda buffers."
|
|||
"Filter lines in the agenda buffer that have a specific category.
|
||||
The category is that of the current line.
|
||||
Without prefix argument, keep only the lines of that category.
|
||||
With a prefix argument, exclude the lines of that category.
|
||||
"
|
||||
With a prefix argument, exclude the lines of that category."
|
||||
(interactive "P")
|
||||
(if (and org-agenda-filtered-by-category
|
||||
org-agenda-category-filter)
|
||||
|
|
@ -7912,7 +7911,7 @@ Negative selection means regexp must not match for selection of an entry."
|
|||
|
||||
(defun org-agenda-forward-block (&optional backward)
|
||||
"Move forward by one agenda block.
|
||||
When optional argument BACKWARD is set, go backward"
|
||||
When optional argument BACKWARD is set, go backward."
|
||||
(interactive)
|
||||
(cond ((not (derived-mode-p 'org-agenda-mode))
|
||||
(user-error
|
||||
|
|
|
|||
|
|
@ -408,7 +408,7 @@ For source-blocks `org-src-block-faces' takes precedence."
|
|||
:group 'org-faces)
|
||||
|
||||
(defface org-verbatim '((t (:inherit shadow)))
|
||||
"Face for fixed-with text like code snippets"
|
||||
"Face for fixed-with text like code snippets."
|
||||
:group 'org-faces
|
||||
:version "22.1")
|
||||
|
||||
|
|
@ -608,8 +608,8 @@ If it is less than 8, the level-1 face gets re-used for level N+1 etc."
|
|||
(defcustom org-cycle-level-faces t
|
||||
"Non-nil means level styles cycle after level `org-n-level-faces'.
|
||||
Then so level org-n-level-faces+1 is styled like level 1.
|
||||
If nil, then all levels >=org-n-level-faces are styled like
|
||||
level org-n-level-faces"
|
||||
If nil, then all levels >= org-n-level-faces are styled like
|
||||
level org-n-level-faces."
|
||||
:group 'org-appearance
|
||||
:group 'org-faces
|
||||
:version "24.1"
|
||||
|
|
|
|||
|
|
@ -299,7 +299,7 @@ LEVEL is the current level of heading. INDENTATION is the
|
|||
expected indentation when wrapping line.
|
||||
|
||||
When optional argument HEADING is non-nil, assume line is at
|
||||
a heading. Moreover, if is is `inlinetask', the first star will
|
||||
a heading. Moreover, if it is `inlinetask', the first star will
|
||||
have `org-warning' face."
|
||||
(let* ((line (aref (pcase heading
|
||||
(`nil org-indent--text-line-prefixes)
|
||||
|
|
|
|||
|
|
@ -643,7 +643,7 @@ program is needed for, so that the error message can be more informative."
|
|||
(defvar org-inlinetask-min-level) ; defined in org-inlinetask.el
|
||||
(defun org-get-limited-outline-regexp ()
|
||||
"Return outline-regexp with limited number of levels.
|
||||
The number of levels is controlled by `org-inlinetask-min-level'"
|
||||
The number of levels is controlled by `org-inlinetask-min-level'."
|
||||
(cond ((not (derived-mode-p 'org-mode))
|
||||
outline-regexp)
|
||||
((not (featurep 'org-inlinetask))
|
||||
|
|
|
|||
|
|
@ -57,7 +57,7 @@ In addition to this, the list may also contain the following symbols:
|
|||
|
||||
`org-agenda-text-search-extra-files'
|
||||
Include the files given in the variable
|
||||
`org-agenda-text-search-extra-files'"
|
||||
`org-agenda-text-search-extra-files'."
|
||||
:group 'org-mobile
|
||||
:type '(list :greedy t
|
||||
(option (const :tag "org-agenda-files" org-agenda-files))
|
||||
|
|
|
|||
12
lisp/org.el
12
lisp/org.el
|
|
@ -2716,7 +2716,7 @@ selection scheme.
|
|||
When nil, fast selection is never used.
|
||||
|
||||
When the symbol `prefix', it will be used when `org-todo' is called
|
||||
with a prefix argument, i.e. `\\[universal-argument] \\[org-todo]' \
|
||||
with a prefix argument, i.e. `\\[universal-argument] \\[org-todo]' \
|
||||
in an Org buffer, and
|
||||
`\\[universal-argument] t' in an agenda buffer.
|
||||
|
||||
|
|
@ -3379,7 +3379,7 @@ When nil, only the minibuffer will be available."
|
|||
(defcustom org-extend-today-until 0
|
||||
"The hour when your day really ends. Must be an integer.
|
||||
This has influence for the following applications:
|
||||
- When switching the agenda to \"today\". It it is still earlier than
|
||||
- When switching the agenda to \"today\". If it is still earlier than
|
||||
the time given here, the day recognized as TODAY is actually yesterday.
|
||||
- When a date is read from the user and it is still before the time given
|
||||
here, the current date and time will be assumed to be yesterday, 23:59.
|
||||
|
|
@ -3700,7 +3700,7 @@ and the properties ending in \"_ALL\" when they are used as descriptor
|
|||
for valid values of a property.
|
||||
|
||||
Note for programmers:
|
||||
When querying an entry with `org-entry-get', you can control if inheritance
|
||||
When querying an entry with `org-entry-get', you can control if inheritance
|
||||
should be used. By default, `org-entry-get' looks only at the local
|
||||
properties. You can request inheritance by setting the inherit argument
|
||||
to t (to force inheritance) or to `selective' (to respect the setting
|
||||
|
|
@ -9143,7 +9143,7 @@ sub-tree if optional argument INHERIT is non-nil."
|
|||
'org-stats stats)))))))
|
||||
|
||||
(defun org-refresh-effort-properties ()
|
||||
"Refresh effort properties"
|
||||
"Refresh effort properties."
|
||||
(org-refresh-properties
|
||||
org-effort-property
|
||||
'((effort . identity)
|
||||
|
|
@ -12368,7 +12368,7 @@ not relevant for the behavior, but it makes things more visible.
|
|||
Note that toggling the tag with tags commands will not change the property
|
||||
and therefore not influence behavior!
|
||||
|
||||
This can be t, meaning the tag ORDERED should be used, It can also be a
|
||||
This can be t, meaning the tag ORDERED should be used. It can also be a
|
||||
string to select a different tag for this task."
|
||||
:group 'org-todo
|
||||
:type '(choice
|
||||
|
|
@ -19951,7 +19951,7 @@ depending on context. See the individual commands for more information."
|
|||
Depending on context, this does one of the following:
|
||||
|
||||
- switch a timestamp at point one day into the future
|
||||
- on a headline, switch to the next TODO keyword.
|
||||
- on a headline, switch to the next TODO keyword
|
||||
- on an item, switch entire list to the next bullet type
|
||||
- on a property line, switch to the next allowed value
|
||||
- on a clocktable definition line, move time block into the future"
|
||||
|
|
|
|||
|
|
@ -1151,7 +1151,7 @@ checkboxes. The other two use the `off' checkbox for `trans'.")
|
|||
|
||||
(defcustom org-html-checkbox-type 'ascii
|
||||
"The type of checkboxes to use for HTML export.
|
||||
See `org-html-checkbox-types' for for the values used for each
|
||||
See `org-html-checkbox-types' for the values used for each
|
||||
option."
|
||||
:group 'org-export-html
|
||||
:version "24.4"
|
||||
|
|
|
|||
|
|
@ -3279,7 +3279,7 @@ property."
|
|||
(let ((attr (org-export-read-attribute :attr_latex table)))
|
||||
(when (plist-get attr :rmlines)
|
||||
;; When the "rmlines" attribute is provided, remove all hlines
|
||||
;; but the the one separating heading from the table body.
|
||||
;; but the one separating heading from the table body.
|
||||
(let ((n 0) (pos 0))
|
||||
(while (and (< (length output) pos)
|
||||
(setq pos (string-match "^\\\\hline\n?" output pos)))
|
||||
|
|
|
|||
|
|
@ -159,7 +159,7 @@ When nil, no transformation is made."
|
|||
;; Src blocks
|
||||
|
||||
(defcustom org-man-source-highlight nil
|
||||
"Use GNU source highlight to embellish source blocks "
|
||||
"Use GNU source highlight to embellish source blocks."
|
||||
:group 'org-export-man
|
||||
:version "24.4"
|
||||
:package-version '(Org . "8.0")
|
||||
|
|
@ -1042,7 +1042,7 @@ holding contextual information."
|
|||
|
||||
(defun org-man-verse-block (_verse-block contents _info)
|
||||
"Transcode a VERSE-BLOCK element from Org to Man.
|
||||
CONTENTS is verse block contents. INFO is a plist holding
|
||||
CONTENTS is verse block contents. INFO is a plist holding
|
||||
contextual information."
|
||||
(format ".RS\n.ft I\n%s\n.ft\n.RE" contents))
|
||||
|
||||
|
|
|
|||
|
|
@ -909,7 +909,7 @@ PROJECT is the current project."
|
|||
|
||||
(defun org-publish-sitemap-default (title list)
|
||||
"Default site map, as a string.
|
||||
TITLE is the the title of the site map. LIST is an internal
|
||||
TITLE is the title of the site map. LIST is an internal
|
||||
representation for the files to include, as returned by
|
||||
`org-list-to-lisp'. PROJECT is the current project."
|
||||
(concat "#+TITLE: " title "\n\n"
|
||||
|
|
|
|||
Loading…
Reference in New Issue