master cb87eef: Declare some completion predicates

[Michael Albinus]

branch: master
commit cb87eeff1bf88d9d1849c452e8b9953b06ada454
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>

    Declare some completion predicates
    
    * lisp/filenotify.el (file-notify-handle-event):
    * lisp/net/dbus.el (dbus-handle-event): Declare `completion-predicate'.
---
 lisp/filenotify.el | 1 +
 lisp/net/dbus.el   | 1 +
 2 files changed, 2 insertions(+)

diff --git a/lisp/filenotify.el b/lisp/filenotify.el
index 7857177..07871bb 100644
--- a/lisp/filenotify.el
+++ b/lisp/filenotify.el
@@ -100,6 +100,7 @@ If it is registered in `file-notify-descriptors', a 
`stopped' event is sent."
   "Handle a file system monitoring event, coming from backends.
 If OBJECT is a filewatch event, call its callback.
 Otherwise, signal a `file-notify-error'."
+  (declare (completion ignore))
   (interactive "e")
   (when file-notify-debug
     (message "file-notify-handle-event %S" object))
diff --git a/lisp/net/dbus.el b/lisp/net/dbus.el
index a9de35c..1e7f836 100644
--- a/lisp/net/dbus.el
+++ b/lisp/net/dbus.el
@@ -1144,6 +1144,7 @@ compound type arguments (TYPE VALUE) will be kept as is."
 EVENT is a D-Bus event, see `dbus-check-event'.  HANDLER, being
 part of the event, is called with arguments ARGS (without type information).
 If the HANDLER returns a `dbus-error', it is propagated as return message."
+  (declare (completion ignore))
   (interactive "e")
   (condition-case err
       (let (monitor args result)