Commit 13973643 authored by Stefan Monnier's avatar Stefan Monnier

* progmodes/prolog.el (prolog-mode): Use define-derived-mode.

parent c26ea4b2
2010-05-15 Stefan Monnier <monnier@iro.umontreal.ca>
* progmodes/prolog.el (prolog-mode): Use define-derived-mode.
* pcomplete.el (pcomplete-completions-at-point): New function,
extracted from pcomplete-std-complete.
(pcomplete-std-complete): Use it.
......
......@@ -136,26 +136,18 @@ When nil, send actual operating system end of file."
))
;;;###autoload
(defun prolog-mode ()
(define-derived-mode prolog-mode prog-mode "Prolog"
"Major mode for editing Prolog code for Prologs.
Blank lines and `%%...' separate paragraphs. `%'s start comments.
Commands:
\\{prolog-mode-map}
Entry to this mode calls the value of `prolog-mode-hook'
if that value is non-nil."
(interactive)
(kill-all-local-variables)
(use-local-map prolog-mode-map)
(set-syntax-table prolog-mode-syntax-table)
(setq major-mode 'prolog-mode)
(setq mode-name "Prolog")
(prolog-mode-variables)
(set (make-local-variable 'comment-add) 1)
;; font lock
(setq font-lock-defaults '(prolog-font-lock-keywords
nil nil nil
beginning-of-line))
(run-mode-hooks 'prolog-mode-hook))
beginning-of-line)))
(defun prolog-indent-line ()
"Indent current line as Prolog code.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment