Mercurial > emacs
changeset 12882:83fd8f17cfe4
(pascal-mode): Set comment-start.
(pascal-toggle-completions): Doc fix.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 17 Aug 1995 22:08:36 +0000 |
parents | 1df99da28f3d |
children | c281a02dbb9f |
files | lisp/progmodes/pascal.el |
diffstat | 1 files changed, 6 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/pascal.el Thu Aug 17 19:40:54 1995 +0000 +++ b/lisp/progmodes/pascal.el Thu Aug 17 22:08:36 1995 +0000 @@ -196,10 +196,10 @@ will do all lineups.") (defvar pascal-toggle-completions nil - "*Non-nil means that \\<pascal-mode-map>\\[pascal-complete-label] should \ -not display a completion buffer when -the label couldn't be completed, but instead toggle the possible completions -with repeated \\[pascal-complete-label]'s.") + "*Non-nil means \\<pascal-mode-map>\\[pascal-complete-word] should try all possible completions one by one. +Repeated use of \\[pascal-complete-word] will show you all of them. +Normally, when there is more than one possible completion, +it displays a list of all possible completions.") (defvar pascal-type-keywords '("array" "file" "packed" "char" "integer" "real" "string" "record") @@ -320,6 +320,8 @@ (setq parse-sexp-ignore-comments nil) (make-local-variable 'case-fold-search) (setq case-fold-search t) + (make-local-variable 'comment-start) + (setq comment-start "{") (make-local-variable 'comment-start-skip) (setq comment-start-skip "(\\*+ *\\|{ *") (make-local-variable 'comment-end)