diff options
Diffstat (limited to 'lisp/net/zeroconf.el')
| -rw-r--r-- | lisp/net/zeroconf.el | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/lisp/net/zeroconf.el b/lisp/net/zeroconf.el index a889a6a4177..6a1a009410b 100644 --- a/lisp/net/zeroconf.el +++ b/lisp/net/zeroconf.el @@ -1,6 +1,6 @@ ;;; zeroconf.el --- Service browser using Avahi. -;; Copyright (C) 2008-2011 Free Software Foundation, Inc. +;; Copyright (C) 2008-2012 Free Software Foundation, Inc. ;; Author: Michael Albinus <michael.albinus@gmx.de> ;; Keywords: comm, hardware @@ -102,11 +102,6 @@ ;; Pacify byte-compiler. D-Bus support in the Emacs core can be ;; disabled with configuration option "--without-dbus". Declare used ;; subroutines and variables of `dbus' therefore. -(eval-when-compile - (require 'cl)) - -(declare-function dbus-call-method "dbusbind.c") -(declare-function dbus-register-signal "dbusbind.c") (defvar dbus-debug) (require 'dbus) @@ -548,7 +543,7 @@ DOMAIN is nil, the local domain is used." ((string-equal (dbus-event-member-name last-input-event) "ItemNew") ;; Parameters: (interface protocol type domain flags) ;; Register a service browser. - (let ((object-path (zeroconf-register-service-browser (nth-value 2 val)))) + (let ((object-path (zeroconf-register-service-browser (nth 2 val)))) ;; Register the signals. (dolist (member '("ItemNew" "ItemRemove" "Failure")) (dbus-register-signal |