]> git.eshelyaron.com Git - emacs.git/commitdiff
Update to Org 9.6.1-23-gc45a05
authorKyle Meyer <kyle@kyleam.com>
Mon, 30 Jan 2023 02:42:17 +0000 (21:42 -0500)
committerKyle Meyer <kyle@kyleam.com>
Mon, 30 Jan 2023 02:42:17 +0000 (21:42 -0500)
lisp/org/org-agenda.el
lisp/org/org-macs.el
lisp/org/org-version.el
lisp/org/org.el
lisp/org/ox.el

index 2d194ad34133bbcef4431185bbb7b608e49cd4a1..63107e8e6a4b8ec552e3d860cd97a17c1649dcff 100644 (file)
@@ -3474,13 +3474,17 @@ This ensures the export commands can easily use it."
     (when (setq tmp (plist-get props 'date))
       (when (integerp tmp) (setq tmp (calendar-gregorian-from-absolute tmp)))
       (let ((calendar-date-display-form
-             '(year "-" (string-pad month 2 ?0 'left) "-" (string-pad day 2 ?0 'left))))
+             '((format "%s-%.2d-%.2d" year
+                       (string-to-number month)
+                       (string-to-number day)))))
        (setq tmp (calendar-date-string tmp)))
       (setq props (plist-put props 'date tmp)))
     (when (setq tmp (plist-get props 'day))
       (when (integerp tmp) (setq tmp (calendar-gregorian-from-absolute tmp)))
       (let ((calendar-date-display-form
-             '(year "-" (string-pad month 2 ?0 'left) "-" (string-pad day 2 ?0 'left))))
+             '((format "%s-%.2d-%.2d" year
+                       (string-to-number month)
+                       (string-to-number day)))))
        (setq tmp (calendar-date-string tmp)))
       (setq props (plist-put props 'day tmp))
       (setq props (plist-put props 'agenda-day tmp)))
index 07c668a807d721a9b31e150c3a182d99dd6af6a1..8d7b0b034f8aca3514525e18f7503614392cd3dc 100644 (file)
@@ -46,7 +46,7 @@
   ;; `org-git-version' check because the generated Org version strings
   ;; will not match.
   `(unless (equal (org-release) ,(org-release))
-     (warn "Org version mismatch.  Make sure that correct `load-path' is set early in init.el
+     (warn "Org version mismatch.  Org loading aborted.
 This warning usually appears when a built-in Org version is loaded
 prior to the more recent Org version.
 
index 22f952d7a3042c57d9788ed8bc5394b24e9ccec8..8372a0be4a57453e96d6b40f09ba5f3ce8bd8cf4 100644 (file)
@@ -11,7 +11,7 @@ Inserted by installing Org mode or when a release is made."
 (defun org-git-version ()
   "The Git version of Org mode.
 Inserted by installing Org or when a release is made."
-   (let ((org-git-version "release_9.6.1-16-ge37e9b"))
+   (let ((org-git-version "release_9.6.1-23-gc45a05"))
      org-git-version))
 \f
 (provide 'org-version)
index 153e860f9a501f8222a60b12b09d3913a9381998..1b829d837c7f1a5d1e396aa235ceafdf7fdb7b86 100644 (file)
@@ -8608,6 +8608,7 @@ or to another Org file, automatically push the old position onto the ring."
 (defvar org-agenda-buffer-name)
 (defun org-follow-timestamp-link ()
   "Open an agenda view for the time-stamp date/range at point."
+  (require 'org-agenda)
   ;; Avoid changing the global value.
   (let ((org-agenda-buffer-name org-agenda-buffer-name))
     (cond
index 65f9ff18279f0d5e22edee8e473b5f2bd2f7c5a7..6f819def93afd1849676f826d03f8346dd13d350 100644 (file)
@@ -6600,14 +6600,14 @@ see.
 Optional argument POST-PROCESS is a function which should accept
 no argument.  It is always called within the current process,
 from BUFFER, with point at its beginning.  Export back-ends can
-use it to set a major mode there, e.g,
+use it to set a major mode there, e.g.,
 
   (defun org-latex-export-as-latex
     (&optional async subtreep visible-only body-only ext-plist)
     (interactive)
     (org-export-to-buffer \\='latex \"*Org LATEX Export*\"
       async subtreep visible-only body-only ext-plist
-      #'LaTeX-mode))
+      #\\='LaTeX-mode))
 
 When expressed as an anonymous function, using `lambda',
 POST-PROCESS needs to be quoted.