org-plot: Adjust pcase patterns for Emacs 24 compatibility

* lisp/org-plot.el (org-plot/gnuplot): Make recently introduced pcase
call compatible with Emacs 24.
This commit is contained in:
Kyle Meyer 2020-12-23 00:01:56 -05:00
parent d84136f8db
commit 86184e2cb6
1 changed files with 3 additions and 3 deletions

View File

@ -634,9 +634,9 @@ line directly before or after the table."
(let* ((data-file (make-temp-file "org-plot"))
(table (let ((tbl (org-table-to-lisp)))
(when (pcase (plist-get params :transpose)
('y t)
('yes t)
('t t))
(`y t)
(`yes t)
(`t t))
(if (not (memq 'hline tbl))
(setq tbl (apply #'cl-mapcar #'list tbl))
;; When present, remove hlines as they can't (currentily) be easily transposed.