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.
2010-08-23 19:35:43 +02:00 · 2010-08-23 19:35:43 +02:00 · 9e6391389c
parent a7660225af
commit 9e6391389c
1 changed files with 8 additions and 7 deletions
--- a/lisp/org-wl.el
+++ b/lisp/org-wl.el
@ -142,13 +142,14 @@ ENTITY is a message entity."

 (defun org-wl-store-link ()
  "Store a link to a WL message or folder."
+  (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)))
+      nil))))

 (defun org-wl-store-link-folder ()
  "Store a link to a WL folder."