update packages
This commit is contained in:
@@ -1,4 +1,4 @@
|
||||
;;; ol-bookmark.el --- Links to bookmarks
|
||||
;;; ol-bookmark.el --- Links to bookmarks -*- lexical-binding: t; -*-
|
||||
|
||||
;; Copyright (C) 2008-2021 Free Software Foundation, Inc.
|
||||
;;
|
||||
@@ -59,6 +59,8 @@ Otherwise prompt the user for the right bookmark to use."
|
||||
|
||||
(defun org-bookmark-store-link ()
|
||||
"Store a link to the current line's bookmark in bookmark list."
|
||||
(require 'dired)
|
||||
(declare-function dired-get-filename "dired" (&optional localp no-error-if-not-filep))
|
||||
(let (file bookmark bmks)
|
||||
(cond ((and org-bookmark-in-dired
|
||||
(eq major-mode 'dired-mode))
|
||||
@@ -83,7 +85,7 @@ Otherwise prompt the user for the right bookmark to use."
|
||||
(car bmks)
|
||||
(completing-read "Bookmark: " bmks nil t nil nil (car bmks))))))
|
||||
(if bookmark
|
||||
(org-store-link-props :link (concat "bookmark:" bookmark)
|
||||
(org-link-store-props :link (concat "bookmark:" bookmark)
|
||||
:description bookmark))))
|
||||
|
||||
(provide 'ol-bookmark)
|
||||
|
||||
Reference in New Issue
Block a user