branch: externals/mpdired
commit e5a14107f13db85cd2b3fc8464560b625c448daf
Author: Manuel Giraud <[email protected]>
Commit: Manuel Giraud <[email protected]>
kill useless sentinel
---
mpdired.el | 7 +------
1 file changed, 1 insertion(+), 6 deletions(-)
diff --git a/mpdired.el b/mpdired.el
index 6fbe25b2e0..f0ddfb82d3 100644
--- a/mpdired.el
+++ b/mpdired.el
@@ -560,10 +560,6 @@ used for mark followed by a space."
(message (format "%s done." mpdired--message))
(setq mpdired--message nil))))))))
-(defun mpdired--sentinel (process event)
- (unless (string-search "connection broken" event)
- (message "Process: %s had the event '%s'" process event)))
-
(defun mpdired--local-p (host)
"Is HOST a local socket?"
;; Hack: if the `expand-file-name' of host leads to an existing
@@ -592,8 +588,7 @@ used for mark followed by a space."
:service service
:family (if localp 'local)
:coding 'utf-8
- :filter 'mpdired--filter
- :sentinel 'mpdired--sentinel)))
+ :filter 'mpdired--filter)))
(setq mpdired--network-params params
mpdired--main-buffer (mpdired--main-name host service localp))
(set-process-buffer (apply 'make-network-process params)
