changeset 105928:d91d3722b71f

*** empty log message ***
author Michael Albinus <michael.albinus@gmx.de>
date Mon, 09 Nov 2009 22:15:41 +0000
parents 65e4c9d9ea84
children 1b5554f1d1c8
files lisp/net/dbus.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/net/dbus.el	Mon Nov 09 22:05:25 2009 +0000
+++ b/lisp/net/dbus.el	Mon Nov 09 22:15:41 2009 +0000
@@ -166,8 +166,8 @@
 	   (dolist (val v)
 	     (ignore-errors
 	       (when (and (equal bus (car k))
-			  (string-equal service (cadr val))))
-	       (setq found t))))
+			  (string-equal service (cadr val)))
+		 (setq found t)))))
 	 dbus-registered-functions-table)
 	(unless found
 	  (dbus-call-method