# HG changeset patch # User Francesco Potort # Date 1190491925 0 # Node ID 0d16f8f68da55492332bb299f64712113f6d7fb7 # Parent b171399fe298b35b1c677655e572999870a8ff24 (inferior-octave-mode): Use add-hook to add inferior-octave-directory-tracker to the buffer-local value of comint-input-filter-functions. diff -r b171399fe298 -r 0d16f8f68da5 lisp/progmodes/octave-inf.el --- a/lisp/progmodes/octave-inf.el Sat Sep 22 20:10:49 2007 +0000 +++ b/lisp/progmodes/octave-inf.el Sat Sep 22 20:12:05 2007 +0000 @@ -153,10 +153,11 @@ (setq comint-input-ring-file-name (or (getenv "OCTAVE_HISTFILE") "~/.octave_hist") - comint-input-ring-size (or (getenv "OCTAVE_HISTSIZE") 1024) - comint-input-filter-functions '(inferior-octave-directory-tracker)) + comint-input-ring-size (or (getenv "OCTAVE_HISTSIZE") 1024)) (set (make-local-variable 'comint-dynamic-complete-functions) inferior-octave-dynamic-complete-functions) + (add-hook 'comint-input-filter-functions + 'inferior-octave-directory-tracker nil t) (comint-read-input-ring t) (run-mode-hooks 'inferior-octave-mode-hook))