Mercurial > emacs
diff lisp/subr.el @ 62380:602fb25a831a
(left-fringe-p): New function.
author | Nick Roberts <nickrob@snap.net.nz> |
---|---|
date | Sun, 15 May 2005 23:57:15 +0000 |
parents | 4560134d21fa |
children | a25a4c4602a4 8b66fddd72c5 |
line wrap: on
line diff
--- a/lisp/subr.el Sun May 15 23:51:07 2005 +0000 +++ b/lisp/subr.el Sun May 15 23:57:15 2005 +0000 @@ -2294,6 +2294,9 @@ (and (consp object) (eq (car object) 'frame-configuration))) +(defsubst left-fringe-p () + (equal (car (window-fringes)) 0)) + (defun functionp (object) "Non-nil if OBJECT is any kind of function or a special form. Also non-nil if OBJECT is a symbol and its function definition is