From 66baf2381f54965739f443b89732306326b11071 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?David=20P=C3=A9rez-Su=C3=A1rez?= Date: Sun, 17 Nov 2024 17:42:03 +0000 Subject: [PATCH] Uses equal to compare mode names `(eq x y)` seems to be true if and only if `x` and `y` are the same identical object. I don't really understand how emacs compare strings, but this gives me `nil`. Changing it to `equal` works. --- emacs-org.org | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/emacs-org.org b/emacs-org.org index 761d297..1a9e24e 100644 --- a/emacs-org.org +++ b/emacs-org.org @@ -221,7 +221,7 @@ Emacs love affair. (let* ((clip (if (eq system-type 'darwin) "pbpaste -Prefer rts" "xclip -out -selection 'clipboard' -t text/html")) - (format (if (eq mode-name "Org") "org" "markdown")) + (format (if (equal mode-name "Org") "org" "markdown")) (pandoc (concat "pandoc -f rts -t " format)) (cmd (concat clip " | " pandoc)) (text (shell-command-to-string cmd)))