Mercurial > emacs
comparison lisp/term/bg-mouse.el @ 65101:023a3b40a5d4
(bg-mouse-x, bg-mouse-y, bg-cursor-window): Defvar at compile time.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Wed, 24 Aug 2005 15:10:45 +0000 |
| parents | 34bd8e434dd7 |
| children |
comparison
equal
deleted
inserted
replaced
| 65100:f8a4e96b69d3 | 65101:023a3b40a5d4 |
|---|---|
| 47 (defconst bg-in-scrollbar 16) | 47 (defconst bg-in-scrollbar 16) |
| 48 (defconst bg-in-minibuf 24) | 48 (defconst bg-in-minibuf 24) |
| 49 | 49 |
| 50 ;;; semicolon screws up indenting, so use this instead | 50 ;;; semicolon screws up indenting, so use this instead |
| 51 (defconst semicolon ?\;) | 51 (defconst semicolon ?\;) |
| 52 | |
| 53 (eval-when-compile | |
| 54 (defvar bg-mouse-x) (defvar bg-mouse-y) (defvar bg-cursor-window)) | |
| 52 | 55 |
| 53 ;;; Defuns: | 56 ;;; Defuns: |
| 54 | 57 |
| 55 (defun bg-mouse-report (prefix-arg) | 58 (defun bg-mouse-report (prefix-arg) |
| 56 "Read, parse, and execute a BBN BitGraph mouse click. | 59 "Read, parse, and execute a BBN BitGraph mouse click. |