998 |
(setq meta-complete-list |
(setq meta-complete-list |
999 |
(list (list "\\<\\(\\sw+\\)" 1 'meta-symbol-list) |
(list (list "\\<\\(\\sw+\\)" 1 'meta-symbol-list) |
1000 |
(list "" 'ispell-complete-word))) |
(list "" 'ispell-complete-word))) |
1001 |
(run-hooks 'meta-common-mode-hook 'metafont-mode-hook)) |
(run-mode-hooks 'meta-common-mode-hook 'metafont-mode-hook)) |
1002 |
|
|
1003 |
;;;###autoload |
;;;###autoload |
1004 |
(defun metapost-mode () |
(defun metapost-mode () |
1023 |
(setq meta-complete-list |
(setq meta-complete-list |
1024 |
(list (list "\\<\\(\\sw+\\)" 1 'meta-symbol-list) |
(list (list "\\<\\(\\sw+\\)" 1 'meta-symbol-list) |
1025 |
(list "" 'ispell-complete-word))) |
(list "" 'ispell-complete-word))) |
1026 |
(run-hooks 'meta-common-mode-hook 'metapost-mode-hook)) |
(run-mode-hooks 'meta-common-mode-hook 'metapost-mode-hook)) |
1027 |
|
|
1028 |
|
|
1029 |
;;; Just in case ... |
;;; Just in case ... |