[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals-release/org 8bd3bd0 1/2: ob-C: Adjust pcase pattern for
From: |
ELPA Syncer |
Subject: |
[elpa] externals-release/org 8bd3bd0 1/2: ob-C: Adjust pcase pattern for Emacs 24 compatibility |
Date: |
Sat, 1 May 2021 15:57:10 -0400 (EDT) |
branch: externals-release/org
commit 8bd3bd093bb0ab6647d2c579b339452e15994a27
Author: Kyle Meyer <kyle@kyleam.com>
Commit: Kyle Meyer <kyle@kyleam.com>
ob-C: Adjust pcase pattern for Emacs 24 compatibility
* lisp/ob-C.el (org-babel-C-header-to-C): Switch pcase patterns to
"`X" rather than "'X", which isn't supported until Emacs 25.
These were introduced by 38f87a26b (ob-C.el: Fix a number a
regressions related to table parameters, 2021-04-29).
Reported-by: Ihor Radchenko <yantar92@gmail.com>
Link: https://orgmode.org/list/87y2d2mqik.fsf@localhost
---
lisp/ob-C.el | 10 +++++-----
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/lisp/ob-C.el b/lisp/ob-C.el
index c44aedb..fdfe332 100644
--- a/lisp/ob-C.el
+++ b/lisp/ob-C.el
@@ -481,11 +481,11 @@ specifying a variable with the name of the table."
(let ((table (car head))
(headers (cdr head))
(typename (pcase type
- ('integerp "int")
- ('floatp "double")
- ('stringp (pcase org-babel-c-variant
- ((or 'c 'cpp) "const char*")
- ('d "string"))))))
+ (`integerp "int")
+ (`floatp "double")
+ (`stringp (pcase org-babel-c-variant
+ ((or `c `cpp) "const char*")
+ (`d "string"))))))
(concat
(pcase org-babel-c-variant
((or `c `cpp)