summaryrefslogtreecommitdiff
path: root/lisp/org/org-protocol.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2021-03-11 13:07:37 -0500
committerStefan Monnier <monnier@iro.umontreal.ca>2021-03-11 13:07:37 -0500
commit7d0dc31833d471a6f86e947d3165d3fd1452a184 (patch)
treef974a3548f1515a0a7c5eb36a3846086cb38530d /lisp/org/org-protocol.el
parente13c30132a81ca2087f7d1a3adc5f6feab84ea2e (diff)
downloademacs-7d0dc31833d471a6f86e947d3165d3fd1452a184.tar.gz
emacs-7d0dc31833d471a6f86e947d3165d3fd1452a184.tar.bz2
emacs-7d0dc31833d471a6f86e947d3165d3fd1452a184.zip
* lisp/org/: Delete some always-nil variables
* lisp/org/ob-lilypond.el (org-babel-lilypond-compile-lilyfile): Remove always-nil variable `arg-2`. * lisp/org/ol-gnus.el (org-gnus-store-link): Remove always-nil variables `newsgroup` and `xarchive`. * lisp/org/ol.el (org-store-link): Remove always-nil variable `description`. * lisp/org/org-clock.el (org-clock-special-range): Remove always-nil variables `m1` and `m`. * lisp/org/org-crypt.el (org--matcher-tags-todo-only): Declare var. * lisp/org/org-protocol.el (org-protocol-open-source): Remove always-nil variable `result`. * lisp/org/ox-odt.el (org-odt-format-label): Remove always-nil variable `short-caption`. (org-odt-link--inline-formula): Remove always-nil variables `width` and `height`. * lisp/org/ox.el (org-export--missing-definitions): Remove always-nil variable `seen`.
Diffstat (limited to 'lisp/org/org-protocol.el')
-rw-r--r--lisp/org/org-protocol.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org/org-protocol.el b/lisp/org/org-protocol.el
index 74043f8340b..726c1ca2bae 100644
--- a/lisp/org/org-protocol.el
+++ b/lisp/org/org-protocol.el
@@ -535,7 +535,7 @@ The location for a browser's bookmark should look like this:
encodeURIComponent(location.href)"
;; As we enter this function for a match on our protocol, the return value
;; defaults to nil.
- (let ((result nil)
+ (let (;; (result nil)
(f (org-protocol-sanitize-uri
(plist-get (org-protocol-parse-parameters fname nil '(:url))
:url))))
@@ -586,7 +586,7 @@ The location for a browser's bookmark should look like this:
(if (file-exists-p the-file)
(message "%s: permission denied!" the-file)
(message "%s: no such file or directory." the-file))))))
- result)))
+ nil))) ;; FIXME: Really?
;;; Core functions: