mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 10:30:25 -08:00
* lisp: Prefer inlinable functions to macros.
* lisp/fringe.el (fringe-bitmap-p): Make it a plain function. * lisp/tooltip.el (tooltip-region-active-p): Remove. * lisp/net/shr.el (shr-char-breakable-p, shr-char-kinsoku-bol-p) (shr-char-kinsoku-eol-p, shr-char-nospace-p): Use define-inline. * lisp/url/url-future.el (url-future-done-p, url-future-completed-p) (url-future-errored-p, url-future-cancelled-p): * lisp/url/url-dav.el (url-dav-http-success-p): Use define-inline. * lisp/vc/ediff-init.el (ediff-odd-p): Remove. (ediff-background-face): Use cl-oddp instead. (ediff-buffer-live-p): Make it a defsubst.
This commit is contained in:
parent
887fa62285
commit
be307485f7
9 changed files with 48 additions and 32 deletions
|
|
@ -83,7 +83,7 @@
|
|||
(hollow-small . hollow-square))))
|
||||
|
||||
|
||||
(defmacro fringe-bitmap-p (symbol)
|
||||
(defun fringe-bitmap-p (symbol)
|
||||
"Return non-nil if SYMBOL is a fringe bitmap."
|
||||
`(get ,symbol 'fringe))
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue