emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

emacs-28 d4e2850b32: Update to Org 9.5.2-3-geb9f34


From: Kyle Meyer
Subject: emacs-28 d4e2850b32: Update to Org 9.5.2-3-geb9f34
Date: Sun, 26 Dec 2021 16:45:40 -0500 (EST)

branch: emacs-28
commit d4e2850b323fdce7b4d658ece50f6071432deae8
Author: Kyle Meyer <kyle@kyleam.com>
Commit: Kyle Meyer <kyle@kyleam.com>

    Update to Org 9.5.2-3-geb9f34
---
 etc/refcards/orgcard.tex |  2 +-
 lisp/org/ob-gnuplot.el   | 21 ++++++++++++++++-----
 lisp/org/org-clock.el    |  2 +-
 lisp/org/org-version.el  |  4 ++--
 lisp/org/org.el          |  3 +--
 5 files changed, 21 insertions(+), 11 deletions(-)

diff --git a/etc/refcards/orgcard.tex b/etc/refcards/orgcard.tex
index 181516172d..01184200d7 100644
--- a/etc/refcards/orgcard.tex
+++ b/etc/refcards/orgcard.tex
@@ -1,5 +1,5 @@
 % Reference Card for Org Mode
-\def\orgversionnumber{9.5.1}
+\def\orgversionnumber{9.5.2}
 \def\versionyear{2021}          % latest update
 \input emacsver.tex
 
diff --git a/lisp/org/ob-gnuplot.el b/lisp/org/ob-gnuplot.el
index 8c4a5957b9..17af2ae5b0 100644
--- a/lisp/org/ob-gnuplot.el
+++ b/lisp/org/ob-gnuplot.el
@@ -284,14 +284,25 @@ then create one.  Return the initialized session.  The 
current
 (defun org-babel-gnuplot-table-to-data (table data-file params)
   "Export TABLE to DATA-FILE in a format readable by gnuplot.
 Pass PARAMS through to `orgtbl-to-generic' when exporting TABLE."
+  (require 'ox-org)
   (with-temp-file data-file
     (insert (let ((org-babel-gnuplot-timestamp-fmt
                   (or (plist-get params :timefmt) "%Y-%m-%d-%H:%M:%S")))
-             (orgtbl-to-generic
-              table
-              (org-combine-plists
-               '(:sep "\t" :fmt org-babel-gnuplot-quote-tsv-field :raw t 
:backend ascii)
-               params)))))
+              (replace-regexp-in-string
+               ;; org export backend adds "|" at the beginning/end of
+               ;; the table lines.  Strip those.
+               "^|\\(.+\\)|$"
+               "\\1"
+              (orgtbl-to-generic
+               table
+               (org-combine-plists
+                '( :sep "\t" :fmt org-babel-gnuplot-quote-tsv-field
+                    ;; Two setting below are needed to make :fmt work.
+                    :raw t
+                    ;; Use `org', not `ascii' because `ascii' may
+                    ;; sometimes mishandle quoted strings.
+                    :backend org)
+                params))))))
   data-file)
 
 (provide 'ob-gnuplot)
diff --git a/lisp/org/org-clock.el b/lisp/org/org-clock.el
index 143ed4f123..6f83fe2bcb 100644
--- a/lisp/org/org-clock.el
+++ b/lisp/org/org-clock.el
@@ -1747,7 +1747,7 @@ Optional argument N tells to change by that many units."
   (org-clock-timestamps-change 'up n))
 
 (defun org-clock-timestamps-down (&optional n)
-  "Increase CLOCK timestamps at cursor.
+  "Decrease CLOCK timestamps at cursor.
 Optional argument N tells to change by that many units."
   (interactive "P")
   (org-clock-timestamps-change 'down n))
diff --git a/lisp/org/org-version.el b/lisp/org/org-version.el
index 514f82ea4a..1053bbe22c 100644
--- a/lisp/org/org-version.el
+++ b/lisp/org/org-version.el
@@ -5,13 +5,13 @@
 (defun org-release ()
   "The release version of Org.
 Inserted by installing Org mode or when a release is made."
-   (let ((org-release "9.5.1"))
+   (let ((org-release "9.5.2"))
      org-release))
 ;;;###autoload
 (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.5.1-31-ga18849"))
+   (let ((org-git-version "release_9.5.2-3-geb9f34"))
      org-git-version))
 
 (provide 'org-version)
diff --git a/lisp/org/org.el b/lisp/org/org.el
index f784369f95..d58f6af550 100644
--- a/lisp/org/org.el
+++ b/lisp/org/org.el
@@ -9,7 +9,7 @@
 ;; Homepage: https://orgmode.org
 ;; Package-Requires: ((emacs "25.1"))
 
-;; Version: 9.5.1
+;; Version: 9.5.2
 
 ;; This file is part of GNU Emacs.
 ;;
@@ -5114,7 +5114,6 @@ stacked delimiters is N.  Escaping delimiters is not 
possible."
                                     '(invisible t))
                (add-text-properties (match-beginning 3) (match-end 3)
                                     '(invisible t)))
-              (goto-char (match-end 0))
              (throw :exit t))))))))
 
 (defun org-emphasize (&optional char)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]