lisp/*.el: Force non-nil result to t, to match docstring

* lisp/emacs-lock.el (emacs-lock-live-process-p):
* lisp/shadowfile.el (shadow-file-match):
* lisp/emacs-lisp/edebug.el (edebug-basic-spec):
* lisp/mail/rmail.el (rmail-expunge-confirmed):
* lisp/net/soap-client.el (soap-should-encode-value-for-xs-element):
* lisp/progmodes/idlwave.el (idlwave-quoted):
* lisp/progmodes/idlw-shell.el (idlwave-shell-filename-string):
* lisp/textmodes/refbib.el (r2b-isa-proceedings):
* lisp/textmodes/texnfo-upd.el (texinfo-find-lower-level-node):
Normalize boolean result.
This commit is contained in:
Juanma Barranquero 2019-10-17 02:08:43 +02:00
parent d502f0c4b5
commit 2bb0703e24
9 changed files with 33 additions and 27 deletions

View file

@ -258,7 +258,8 @@ An extant spec symbol is a symbol that is not a function and has a
(setq spec (cdr spec)))
t))
((symbolp spec)
(unless (functionp spec) (function-get spec 'edebug-form-spec)))))
(unless (functionp spec)
(and (function-get spec 'edebug-form-spec) t)))))
;;; Utilities