branch: elpa/pcmpl-args
commit 7bc360c2e5f84e2fc4024a9783c164b4df174acb
Author: Troy Hinckley <t.mac...@gmail.com>
Commit: Troy Hinckley <t.mac...@gmail.com>

    Don't throw an error when man page is missing
    
    Closes #3
---
 pcmpl-args.el | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/pcmpl-args.el b/pcmpl-args.el
index 918a36aaca..872c712a61 100644
--- a/pcmpl-args.el
+++ b/pcmpl-args.el
@@ -184,9 +184,12 @@ If the exit status is non-zero, an error is signaled."
   (pcmpl-args-debug "!pcmpl-args-process-file: %S" (cons program args))
   (let* ((retcode (apply 'process-file program nil t nil args)))
     (when (not (equal 0 retcode))
-      (error "%s" (if (equal (pcmpl-args-strip (buffer-string)) "")
-                      (format "Shell command failed with code %S" retcode)
-                    (pcmpl-args-strip (buffer-string)))))
+      (let ((pcmpl-args-debug t))
+        (pcmpl-args-debug
+         "Error: %s"
+         (if (equal (pcmpl-args-strip (buffer-string)) "")
+             (format "Shell command failed with code %S" retcode)
+           (pcmpl-args-strip (buffer-string))))))
     retcode))
 
 (defun pcmpl-args-process-lines (program &rest args)

Reply via email to