diff options
| author | Sam Steingold | 2001-11-27 18:03:29 +0000 |
|---|---|---|
| committer | Sam Steingold | 2001-11-27 18:03:29 +0000 |
| commit | 646adf9009fbd5cda92d6525d4d96d51c44274a6 (patch) | |
| tree | f83db79fced806cfebcbe13b588f24f1fe4b9c53 | |
| parent | b2013aad9bdfc147a7351c058cbf672bc5bdcbcc (diff) | |
| download | emacs-646adf9009fbd5cda92d6525d4d96d51c44274a6.tar.gz emacs-646adf9009fbd5cda92d6525d4d96d51c44274a6.zip | |
Converted backquote to the new style (in a string).
| -rw-r--r-- | lisp/ChangeLog | 1 | ||||
| -rw-r--r-- | lisp/expand.el | 8 |
2 files changed, 5 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f39090f4a69..2e19238b354 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -8,6 +8,7 @@ | |||
| 8 | * term/sun-mouse.el, textmodes/artist.el: | 8 | * term/sun-mouse.el, textmodes/artist.el: |
| 9 | Converted backquote to the new style. | 9 | Converted backquote to the new style. |
| 10 | * mouse.el, reposition.el: Likewise (in comments). | 10 | * mouse.el, reposition.el: Likewise (in comments). |
| 11 | * expand.el: Likewise (in a string). | ||
| 11 | 12 | ||
| 12 | 2001-11-27 Richard M. Stallman <rms@gnu.org> | 13 | 2001-11-27 Richard M. Stallman <rms@gnu.org> |
| 13 | 14 | ||
diff --git a/lisp/expand.el b/lisp/expand.el index 4c1daa430ea..bb024e5866b 100644 --- a/lisp/expand.el +++ b/lisp/expand.el | |||
| @@ -47,7 +47,7 @@ | |||
| 47 | ;; ("default" "default:\n\nbreak;" 10) | 47 | ;; ("default" "default:\n\nbreak;" 10) |
| 48 | ;; ("main" "int\nmain(int argc, char * argv[])\n{\n\n}\n" 37)) | 48 | ;; ("main" "int\nmain(int argc, char * argv[])\n{\n\n}\n" 37)) |
| 49 | ;; "Expansions for C mode") | 49 | ;; "Expansions for C mode") |
| 50 | ;; | 50 | ;; |
| 51 | ;; and enter Abbrev mode with the following hook : | 51 | ;; and enter Abbrev mode with the following hook : |
| 52 | ;; | 52 | ;; |
| 53 | ;; (add-hook 'c-mode-hook (function (lambda () | 53 | ;; (add-hook 'c-mode-hook (function (lambda () |
| @@ -144,7 +144,7 @@ | |||
| 144 | (concat | 144 | (concat |
| 145 | "(defmacro ()\n" | 145 | "(defmacro ()\n" |
| 146 | " \"\"\n" | 146 | " \"\"\n" |
| 147 | " (` \n" | 147 | " `( \n" |
| 148 | " ))") | 148 | " ))") |
| 149 | (list 11 13 18 25)) | 149 | (list 11 13 18 25)) |
| 150 | 150 | ||
| @@ -184,7 +184,7 @@ | |||
| 184 | 184 | ||
| 185 | ) | 185 | ) |
| 186 | "Expansions for Lisp mode. See `expand-add-abbrevs'.") | 186 | "Expansions for Lisp mode. See `expand-add-abbrevs'.") |
| 187 | 187 | ||
| 188 | ;; perl example from Jari Aalto <jaalto@tre.tele.nokia.fi> | 188 | ;; perl example from Jari Aalto <jaalto@tre.tele.nokia.fi> |
| 189 | (defconst expand-sample-perl-mode-expand-list | 189 | (defconst expand-sample-perl-mode-expand-list |
| 190 | (list | 190 | (list |
| @@ -496,7 +496,7 @@ This is used only in conjunction with `expand-add-abbrevs'." | |||
| 496 | (defun expand-skeleton-end-hook () | 496 | (defun expand-skeleton-end-hook () |
| 497 | (if skeleton-positions | 497 | (if skeleton-positions |
| 498 | (setq expand-list skeleton-positions))) | 498 | (setq expand-list skeleton-positions))) |
| 499 | 499 | ||
| 500 | (add-hook 'skeleton-end-hook (function expand-skeleton-end-hook)) | 500 | (add-hook 'skeleton-end-hook (function expand-skeleton-end-hook)) |
| 501 | 501 | ||
| 502 | (provide 'expand) | 502 | (provide 'expand) |