Mercurial > emacs
comparison lisp/textmodes/outline.el @ 30881:4758e306c41e
(outline-minor-mode): Don't quote lambda.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Wed, 16 Aug 2000 20:34:25 +0000 |
| parents | cadaa8756773 |
| children | 350d5ee0e430 |
comparison
equal
deleted
inserted
replaced
| 30880:3af33efc3d66 | 30881:4758e306c41e |
|---|---|
| 282 (if outline-minor-mode | 282 (if outline-minor-mode |
| 283 (progn | 283 (progn |
| 284 (make-local-hook 'change-major-mode-hook) | 284 (make-local-hook 'change-major-mode-hook) |
| 285 ;; Turn off this mode if we change major modes. | 285 ;; Turn off this mode if we change major modes. |
| 286 (add-hook 'change-major-mode-hook | 286 (add-hook 'change-major-mode-hook |
| 287 '(lambda () (outline-minor-mode -1)) | 287 (lambda () (outline-minor-mode -1)) |
| 288 nil t) | 288 nil t) |
| 289 (make-local-variable 'line-move-ignore-invisible) | 289 (make-local-variable 'line-move-ignore-invisible) |
| 290 (setq line-move-ignore-invisible t) | 290 (setq line-move-ignore-invisible t) |
| 291 ;; Cause use of ellipses for invisible text. | 291 ;; Cause use of ellipses for invisible text. |
| 292 (add-to-invisibility-spec '(outline . t)) | 292 (add-to-invisibility-spec '(outline . t)) |