[elpa] externals/gnorb d786b81 063/449: Random comment edits and indenting changes.

[Stefan Monnier]

branch: externals/gnorb
commit d786b814ba5d4893b35b6a9e04656d4a4648c49e
Author: Eric Abrahamsen <eric@ericabrahamsen.net>
Commit: Eric Abrahamsen <eric@ericabrahamsen.net>

    Random comment edits and indenting changes.
    
    gnorb-org.el
---
 lisp/gnorb-org.el | 19 +++++++++++++------
 1 file changed, 13 insertions(+), 6 deletions(-)

diff --git a/lisp/gnorb-org.el b/lisp/gnorb-org.el
index e7b56b2..40402e1 100644
--- a/lisp/gnorb-org.el
+++ b/lisp/gnorb-org.el
@@ -40,7 +40,11 @@ org-todo regardless of TODO type."
 
 (defun gnorb-org-contact-link (rec)
   "Prompt for a BBDB record and insert a link to that record at
-point."
+point.
+
+There's really no reason to use this instead of regular old
+`org-insert-link' with BBDB completion. But there might be in the
+future!"
   (interactive (list (gnorb-prompt-for-bbdb-record)))
   (let* ((name (bbdb-record-name rec))
         (link (concat "bbdb:" (org-link-escape name))))
@@ -191,9 +195,10 @@ current heading."
   (when (featurep 'org-attach)
     (let* ((attach-dir (org-attach-dir t))
           (files
-           (mapcar (lambda (f)
-                     (expand-file-name f attach-dir))
-                   (org-attach-file-list attach-dir))))
+           (mapcar
+            (lambda (f)
+              (expand-file-name f attach-dir))
+            (org-attach-file-list attach-dir))))
       files)))
 
 (defun gnorb-org-handle-mail ()
@@ -303,6 +308,8 @@ default set of parameters."
         (attachments (gnorb-org-attachment-list))
         (org-id (org-id-get-create))
         text)
+    ;; this should just go into a call to `org-handle-mail', passing
+    ;; the results of the export as an argument
     (setq gnorb-org-window-conf (current-window-configuration))
     (if (bufferp result)
        (setq text result)
@@ -313,8 +320,8 @@ default set of parameters."
 
 (defcustom gnorb-org-capture-collect-link-p t
   "Should the capture process store a link to the gnus message or
-  BBDB record under point, even if it's not part of the
-  template?"
+  BBDB record under point, even if it's not part of the template?
+  You'll probably end up needing it, anyway."
   :group 'gnorb-org)
 
 (defun gnorb-org-capture-collect-link ()