diff options
Diffstat (limited to 'lisp/x-dnd.el')
| -rw-r--r-- | lisp/x-dnd.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/x-dnd.el b/lisp/x-dnd.el index e4e2dec3b82..64635946871 100644 --- a/lisp/x-dnd.el +++ b/lisp/x-dnd.el @@ -433,13 +433,13 @@ otherwise return the frame coordinates." (selection-symbol target-type &optional time-stamp terminal)) (defun x-dnd-version-from-flags (flags) - "Return the version byte from the 32 bit FLAGS in an XDndEnter message" + "Return the version byte from the 32 bit FLAGS in an XDndEnter message." (if (consp flags) ;; Long as cons (ash (car flags) -8) (ash flags -24))) ;; Ordinary number (defun x-dnd-more-than-3-from-flags (flags) - "Return the nmore-than3 bit from the 32 bit FLAGS in an XDndEnter message" + "Return the nmore-than3 bit from the 32 bit FLAGS in an XDndEnter message." (if (consp flags) (logand (cdr flags) 1) (logand flags 1))) |