emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] 18/30: Use `condition-case-unless-debug' more


From: Dmitry Gutov
Subject: [elpa] 18/30: Use `condition-case-unless-debug' more
Date: Tue, 14 Oct 2014 22:22:51 +0000

dgutov pushed a commit to branch master
in repository elpa.

commit 0a46a2ab737c480d1d419b97bda24c7c880b7d9c
Author: Dmitry Gutov <address@hidden>
Date:   Sat Oct 4 14:09:39 2014 +0400

    Use `condition-case-unless-debug' more
---
 company.el |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/company.el b/company.el
index e6244d8..c7b7be7 100644
--- a/company.el
+++ b/company.el
@@ -1029,7 +1029,7 @@ can retrieve meta-data for them."
 
 (defun company-call-frontends (command)
   (dolist (frontend company-frontends)
-    (condition-case err
+    (condition-case-unless-debug err
         (funcall frontend command)
       (error (error "Company: Front-end %s error \"%s\" on command %s"
                     frontend (error-message-string err) command)))))
@@ -1506,7 +1506,7 @@ from the rest of the back-ends in the group, if any, will 
be left at the end."
 
 (defun company-pre-command ()
   (unless (company-keep this-command)
-    (condition-case err
+    (condition-case-unless-debug err
         (when company-candidates
           (company-call-frontends 'pre-command)
           (unless (company--should-continue)
@@ -1528,7 +1528,7 @@ from the rest of the back-ends in the group, if any, will 
be left at the end."
     (company-abort)
     (setq this-command 'company-abort))
   (unless (company-keep this-command)
-    (condition-case err
+    (condition-case-unless-debug err
         (progn
           (unless (equal (point) company-point)
             (let (company-idle-delay) ; Against misbehavior while debugging.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]