Mercurial > hg > xemacs-beta
comparison lisp/derived.el @ 3061:fd1acd2f457a
[xemacs-hg @ 2005-11-13 07:39:26 by ben]
fix 'foo -> `foo', `foo.' -> `foo'.
derived.el, frame.el, toolbar.el, glyphs.el, hyper-apropos.el, mouse.el, files.el, specifier.el: Fix uses of `foo'; change 'foo -> `foo', and put punctuation outside
of quotes.
Add comments in specifier.el about needing better and new convenience
functions.
| author | ben |
|---|---|
| date | Sun, 13 Nov 2005 07:39:29 +0000 |
| parents | eb65d362090f |
| children | 6e11554a16aa |
comparison
equal
deleted
inserted
replaced
| 3060:7679bfa253c2 | 3061:fd1acd2f457a |
|---|---|
| 57 ;; (setq case-fold-search nil)) | 57 ;; (setq case-fold-search nil)) |
| 58 ;; | 58 ;; |
| 59 ;; (define-key hypertext-mode-map [down-mouse-3] 'do-hyper-link) | 59 ;; (define-key hypertext-mode-map [down-mouse-3] 'do-hyper-link) |
| 60 ;; | 60 ;; |
| 61 ;; will create a function `hypertext-mode' with its own (sparse) | 61 ;; will create a function `hypertext-mode' with its own (sparse) |
| 62 ;; keymap `hypertext-mode-map.' The command M-x hypertext-mode will | 62 ;; keymap `hypertext-mode-map'. The command M-x hypertext-mode will |
| 63 ;; perform the following actions: | 63 ;; perform the following actions: |
| 64 ;; | 64 ;; |
| 65 ;; - run the command (text-mode) to get its default setup | 65 ;; - run the command (text-mode) to get its default setup |
| 66 ;; - replace the current keymap with 'hypertext-mode-map,' which will | 66 ;; - replace the current keymap with 'hypertext-mode-map', which will |
| 67 ;; inherit from 'text-mode-map'. | 67 ;; inherit from 'text-mode-map'. |
| 68 ;; - replace the current syntax table with | 68 ;; - replace the current syntax table with |
| 69 ;; 'hypertext-mode-syntax-table', which will borrow its defaults | 69 ;; 'hypertext-mode-syntax-table', which will borrow its defaults |
| 70 ;; from the current text-mode-syntax-table. | 70 ;; from the current text-mode-syntax-table. |
| 71 ;; - replace the current abbrev table with | 71 ;; - replace the current abbrev table with |
| 75 ;; - assign the value 'hypertext-mode' to the 'major-mode' variable | 75 ;; - assign the value 'hypertext-mode' to the 'major-mode' variable |
| 76 ;; - run the body of commands provided in the macro -- in this case, | 76 ;; - run the body of commands provided in the macro -- in this case, |
| 77 ;; set the local variable `case-fold-search' to nil. | 77 ;; set the local variable `case-fold-search' to nil. |
| 78 ;; | 78 ;; |
| 79 ;; The advantages of this system are threefold. First, text mode is | 79 ;; The advantages of this system are threefold. First, text mode is |
| 80 ;; untouched -- if you had added the new keystroke to `text-mode-map,' | 80 ;; untouched -- if you had added the new keystroke to `text-mode-map', |
| 81 ;; possibly using hooks, you would have added it to all text buffers | 81 ;; possibly using hooks, you would have added it to all text buffers |
| 82 ;; -- here, it appears only in hypertext buffers, where it makes | 82 ;; -- here, it appears only in hypertext buffers, where it makes |
| 83 ;; sense. Second, it is possible to build even further, and make | 83 ;; sense. Second, it is possible to build even further, and make |
| 84 ;; a derived mode from a derived mode. The commands | 84 ;; a derived mode from a derived mode. The commands |
| 85 ;; | 85 ;; |