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

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

[elpa] externals/gnorb d61d9b8 370/449: Remove unnecessary with-no-warni


From: Stefan Monnier
Subject: [elpa] externals/gnorb d61d9b8 370/449: Remove unnecessary with-no-warnings
Date: Fri, 27 Nov 2020 23:16:13 -0500 (EST)

branch: externals/gnorb
commit d61d9b8aaf1fc0d83d8eaa8c7922d9902c4e5d77
Author: Eric Abrahamsen <eric@ericabrahamsen.net>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    Remove unnecessary with-no-warnings
    
    * packages/gnorb/gnorb-bbdb.el (gnorb-bbdb-display-messages): Should
      have caught this when updating for new BBDB version.
---
 gnorb-bbdb.el | 47 +++++++++++++++++++++++------------------------
 1 file changed, 23 insertions(+), 24 deletions(-)

diff --git a/gnorb-bbdb.el b/gnorb-bbdb.el
index ceaa0ab..900988f 100644
--- a/gnorb-bbdb.el
+++ b/gnorb-bbdb.el
@@ -491,30 +491,29 @@ layout type."
                     ;; Why aren't I using `bbdb-display-list' with a
                     ;; preformatted list of messages?
                     (concat
-                     (with-no-warnings ; For `indent' again
-                       (bbdb-indent-string
-                        (mapconcat
-                         (lambda (m)
-                           (prog1
-                               (org-propertize
-                                (concat
-                                 (format-time-string
-                                  (replace-regexp-in-string
-                                   "%:subject" (gnorb-bbdb-link-subject m)
-                                   (replace-regexp-in-string
-                                    "%:count" (number-to-string count)
-                                    (if (eq format 'multi)
-                                        gnorb-bbdb-message-link-format-multi
-                                      gnorb-bbdb-message-link-format-one)))
-                                  (gnorb-bbdb-link-date m)))
-                                'face 'gnorb-bbdb-link
-                                'mouse-face 'highlight
-                                'gnorb-bbdb-link-count count
-                                'keymap map)
-                             (incf count)))
-                         val (if (eq format 'multi)
-                                 "\n" ", "))
-                        indent))
+                     (bbdb-indent-string
+                      (mapconcat
+                       (lambda (m)
+                         (prog1
+                             (org-propertize
+                              (concat
+                               (format-time-string
+                                (replace-regexp-in-string
+                                 "%:subject" (gnorb-bbdb-link-subject m)
+                                 (replace-regexp-in-string
+                                  "%:count" (number-to-string count)
+                                  (if (eq format 'multi)
+                                      gnorb-bbdb-message-link-format-multi
+                                    gnorb-bbdb-message-link-format-one)))
+                                (gnorb-bbdb-link-date m)))
+                              'face 'gnorb-bbdb-link
+                              'mouse-face 'highlight
+                              'gnorb-bbdb-link-count count
+                              'keymap map)
+                           (incf count)))
+                       val (if (eq format 'multi)
+                               "\n" ", "))
+                      indent)
                      (if (eq format 'multi) "\n" "")))
                    (t
                     ""))))))



reply via email to

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