summaryrefslogtreecommitdiff
path: root/gnosis.el
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2024-01-19 00:40:04 +0200
committerThanos Apollo <[email protected]>2024-01-19 00:40:04 +0200
commite57b48ba4e5ea9a0de16d35913f120742e79f594 (patch)
treebadf0226b5c4121c1390a798ef4918e2dc2c5efb /gnosis.el
parent980a29d48bbe12bdaae4dad18ca1dd12af5328fa (diff)
gnosis-edit-note-contents: Use eq & null
Diffstat (limited to 'gnosis.el')
-rw-r--r--gnosis.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/gnosis.el b/gnosis.el
index eb84bb9..3e8af94 100644
--- a/gnosis.el
+++ b/gnosis.el
@@ -1119,7 +1119,7 @@ changes."
(extra-notes ,extra-notes)
(image ,image)
(second-image ,second-image))
- do (cond ((equal field 'id)
+ do (cond ((eq field 'id)
(insert (format (concat ":%s " (propertize "%s" 'read-only t) "\n") field value)))
((numberp value)
(insert (format ":%s %s\n" field value)))
@@ -1127,7 +1127,7 @@ changes."
(not (equal value nil)))
(insert (format ":%s '%s\n" field (format "%s" (cl-loop for item in value
collect (format "\"%s\"" item))))))
- ((equal value nil)
+ ((null value)
(insert (format ":%s %s\n" field 'nil)))
(t (insert (format ":%s \"%s\"\n" field value)))))
(delete-char -1) ;; delete extra line