From: Thomas Fitzsimmons <fitzsim@fitzsim.org>
Date: Fri, 10 Nov 2017 14:31:24 +0000 (-0500)
Subject: EUDC: Fix indentation in BBDB backend
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c6c12863ce89a8c7f7b8d301b73d6bcf5376d936;p=emacs.git

EUDC: Fix indentation in BBDB backend

* lisp/net/eudcb-bbdb.el (eudc-bbdb-format-query): Fix
indentation.
(eudc-bbdb-filter-non-matching-record): Likewise.
---

diff --git a/lisp/net/eudcb-bbdb.el b/lisp/net/eudcb-bbdb.el
index 8dff028b9f1..f9c8578e373 100644
--- a/lisp/net/eudcb-bbdb.el
+++ b/lisp/net/eudcb-bbdb.el
@@ -73,10 +73,10 @@ BBDB < 3 used `net'; BBDB >= 3 uses `mail'."
 			(concat firstname " " lastname))
 		   firstname
 		   lastname))
-	(company (cdr (assq 'company query)))
-	(net (cdr (assq 'net query)))
-	(notes (cdr (assq 'notes query)))
-	(phone (cdr (assq 'phone query))))
+	 (company (cdr (assq 'company query)))
+	 (net (cdr (assq 'net query)))
+	 (notes (cdr (assq 'notes query)))
+	 (phone (cdr (assq 'phone query))))
     (list name company net notes phone)))
 
 
@@ -91,7 +91,7 @@ BBDB < 3 used `net'; BBDB >= 3 uses `mail'."
               (case-fold-search t)
               bbdb-val)
           (or (and (memq attr '(firstname lastname aka company phones
-                                addresses net))
+                                          addresses net))
                    (progn
                      (setq bbdb-val
                            (eval (list (intern (concat "bbdb-record-"