Lines Matching +defs:hpf +defs:mode +defs:directory

9 (defun hpf-mode-directory-fn ()
10   "Used to find hpf-mode directory"
13 	  (and load-in-progress (file-name-directory load-file-name))
14 	  (file-name-directory (buffer-file-name)))))
15     (file-name-directory curdir))  
18 (setq hpf-mode-directory (hpf-mode-directory-fn))
20 (add-to-list 'load-path hpf-mode-directory)
21 ;; Files whose extension is .hpf or .het will be edited in HPF mode
22 (setq auto-mode-alist
24        '(("\\.hpf\\'"  . hpf-mode))
25        auto-mode-alist))
26 (autoload 'hpf-mode "hpf-mode" "Entering HPF mode..." t)
27 (message "hpf-mode setup complete")