summaryrefslogtreecommitdiff
path: root/lisp/org/ol.el
diff options
context:
space:
mode:
authorDmitry Gutov <dgutov@yandex.ru>2022-07-11 14:17:45 +0300
committerDmitry Gutov <dgutov@yandex.ru>2022-07-11 14:17:45 +0300
commitd4875e1235375feb8d67bad8b1a76e64445f3b1a (patch)
treef011f6df1cc03dfb724fdffae09886f6589c3adb /lisp/org/ol.el
parent9c00d6c3f6f45755a20d093bbd821673fc7ac405 (diff)
parentb283e36cf1902eeb6d532077e1f46270aa1224e1 (diff)
downloademacs-d4875e1235375feb8d67bad8b1a76e64445f3b1a.tar.gz
Merge branch 'master' into scratch/etags-regenscratch/etags-regen
Diffstat (limited to 'lisp/org/ol.el')
-rw-r--r--lisp/org/ol.el12
1 files changed, 2 insertions, 10 deletions
diff --git a/lisp/org/ol.el b/lisp/org/ol.el
index 2951c3def1e..a0dad926bc2 100644
--- a/lisp/org/ol.el
+++ b/lisp/org/ol.el
@@ -183,7 +183,7 @@ link.
(defcustom org-link-descriptive t
"Non-nil means Org displays descriptive links.
-E.g. [[https://orgmode.org][Org website]] is be displayed as
+E.g. [[https://orgmode.org][Org website]] is displayed as
\"Org Website\", hiding the link itself and just displaying its
description. When set to nil, Org displays the full links
literally.
@@ -1575,19 +1575,11 @@ non-nil."
(setq link
(format-time-string
(car org-time-stamp-formats)
- (encode-time
+ (apply 'encode-time
(list 0 0 0 (nth 1 cd) (nth 0 cd) (nth 2 cd)
nil nil nil))))
(org-link-store-props :type "calendar" :date cd)))
- ((eq major-mode 'w3-mode)
- (setq cpltxt (if (and (buffer-name)
- (not (string-match "Untitled" (buffer-name))))
- (buffer-name)
- (url-view-url t))
- link (url-view-url t))
- (org-link-store-props :type "w3" :url (url-view-url t)))
-
((eq major-mode 'image-mode)
(setq cpltxt (concat "file:"
(abbreviate-file-name buffer-file-name))