ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Don't try to store link if point is at end of buffer. 

* org-wl.el (org-wl-store-link): Don't try to store link if point is
at end of buffer.
This commit is contained in:
David Maus 2010-08-23 19:35:43 +02:00
parent a7660225af
commit 9e6391389c
1 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
lisp/org-wl.el
View File

@ -142,13 +142,14 @@ ENTITY is a message entity."
(defun org-wl-store-link ()
"Store a link to a WL message or folder."
(cond
((memq major-mode '(wl-summary-mode mime-view-mode))
(org-wl-store-link-message))
((eq major-mode 'wl-folder-mode)
(org-wl-store-link-folder))
(t
nil)))
(unless (eobp)
(cond
((memq major-mode '(wl-summary-mode mime-view-mode))
(org-wl-store-link-message))
((eq major-mode 'wl-folder-mode)
(org-wl-store-link-folder))
(t
nil))))
(defun org-wl-store-link-folder ()
"Store a link to a WL folder."