Mercurial > emacs
comparison lisp/emulation/crisp.el @ 50400:95fdaebcdfcb
(top-level): Quote second arg to
`eval-after-load'.
| author | Kai Großjohann <kgrossjo@eu.uu.net> |
|---|---|
| date | Wed, 02 Apr 2003 10:41:40 +0000 |
| parents | b43d8c1413de |
| children | 695cf19ef79e |
comparison
equal
deleted
inserted
replaced
| 50399:aeb40495a6b4 | 50400:95fdaebcdfcb |
|---|---|
| 385 (setq minor-mode-map-alist (cons (cons 'crisp-mode crisp-mode-map) | 385 (setq minor-mode-map-alist (cons (cons 'crisp-mode crisp-mode-map) |
| 386 minor-mode-map-alist)))) | 386 minor-mode-map-alist)))) |
| 387 | 387 |
| 388 ;; Interaction with other packages. | 388 ;; Interaction with other packages. |
| 389 (eval-after-load 'cua | 389 (eval-after-load 'cua |
| 390 (progn | 390 '(progn |
| 391 (add-to-list 'cua--standard-movement-commands 'crisp-home) | 391 (add-to-list 'cua--standard-movement-commands 'crisp-home) |
| 392 (add-to-list 'cua--standard-movement-commands 'crisp-end))) | 392 (add-to-list 'cua--standard-movement-commands 'crisp-end))) |
| 393 | 393 |
| 394 (run-hooks 'crisp-load-hook) | 394 (run-hooks 'crisp-load-hook) |
| 395 (provide 'crisp) | 395 (provide 'crisp) |
| 396 | 396 |
| 397 ;;; crisp.el ends here | 397 ;;; crisp.el ends here |