--- gforth/gforth.el 2000/09/12 19:20:06 1.42 +++ gforth/gforth.el 2000/10/01 11:20:05 1.44 @@ -1,6 +1,6 @@ ;; Forth mode for Emacs -;; Copyright (C) 1995,1996,1997,1998 Free Software Foundation, Inc. +;; Copyright (C) 1995,1996,1997,1998,2000 Free Software Foundation, Inc. ;; This file is part of Gforth. @@ -160,8 +160,8 @@ OBS! All words in forth-negatives must b (setq comment-column 40) (make-local-variable 'comment-start-skip) (setq comment-start-skip "\\ ") - (make-local-variable 'comment-indent-hook) - (setq comment-indent-hook 'forth-comment-indent) + (make-local-hook 'comment-indent-hook) + (add-hook comment-indent-hook 'forth-comment-indent) (make-local-variable 'parse-sexp-ignore-comments) (setq parse-sexp-ignore-comments t)) @@ -241,7 +241,7 @@ Variables controling documentation searc ; (run-forth forth-program-name)) (run-hooks 'forth-mode-hook)) -(setq forth-mode-hook +(add-hook 'forth-mode-hook '(lambda () (make-local-variable 'compile-command) (setq compile-command "gforth ")))