Skip to content

Commit

Permalink
Fix #38
Browse files Browse the repository at this point in the history
  • Loading branch information
fuxialexander committed Jan 10, 2021
1 parent cdbc80e commit 812bbff
Showing 1 changed file with 9 additions and 6 deletions.
15 changes: 9 additions & 6 deletions org-noter-pdftools.el
Original file line number Diff line number Diff line change
Expand Up @@ -169,12 +169,15 @@ To use this, `org-noter-pdftools-use-org-id' has to be t."

(defun org-noter-pdftools--pretty-print-location (location)
"Function for print the LOCATION link."
(let ((loc (if (org-noter-pdftools--location-p location)
location
(org-noter-pdftools--parse-link location))))
(concat "[["
(org-noter-pdftools--location-original-property loc)
"]]")))
(org-noter--with-valid-session
(if (memq (org-noter--session-doc-mode session) '(doc-view-mode pdf-view-mode))
(let ((loc (if (org-noter-pdftools--location-p location)
location
(org-noter-pdftools--parse-link location))))
(concat "[["
(org-noter-pdftools--location-original-property loc)
"]]"))
nil)))

(defun org-noter-pdftools--convert-to-location-cons (location)
"Function for converting the LOCATION link to cons."
Expand Down

0 comments on commit 812bbff

Please sign in to comment.