diff options
| author | Stefan Monnier | 2023-04-10 21:33:56 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2023-04-10 21:33:56 -0400 |
| commit | 54d40577c4bb64d25db030b7d11ab553364e375d (patch) | |
| tree | d08760f8acb384519cf0bed66e1a1d99d712d191 | |
| parent | 9efa6d2cf28f4e21f23bb0dbfedc59a4286dab12 (diff) | |
| download | emacs-54d40577c4bb64d25db030b7d11ab553364e375d.tar.gz emacs-54d40577c4bb64d25db030b7d11ab553364e375d.zip | |
(org-table-make-reference): Fix compiler warning
* lisp/org/org-table.el (org-table-make-reference): Don't use `eq` to
compare against literal strings.
| -rw-r--r-- | lisp/org/org-table.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org/org-table.el b/lisp/org/org-table.el index 5116b1127f7..a38f2a283d7 100644 --- a/lisp/org/org-table.el +++ b/lisp/org/org-table.el | |||
| @@ -2861,7 +2861,7 @@ list, `literal' is for the format specifier L." | |||
| 2861 | (if lispp | 2861 | (if lispp |
| 2862 | (if (eq lispp 'literal) | 2862 | (if (eq lispp 'literal) |
| 2863 | elements | 2863 | elements |
| 2864 | (if (and (eq elements "") (not keep-empty)) | 2864 | (if (and (equal elements "") (not keep-empty)) |
| 2865 | "" | 2865 | "" |
| 2866 | (prin1-to-string | 2866 | (prin1-to-string |
| 2867 | (if numbers (string-to-number elements) elements)))) | 2867 | (if numbers (string-to-number elements) elements)))) |