From 4ca7c4680d02eec2260a920e834425d86dfd1d3e Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 10 Sep 2005 15:05:44 +0000 Subject: [PATCH] (inferior-octave-startup): Resync current dir at the end. --- lisp/ChangeLog | 5 +++++ lisp/progmodes/octave-inf.el | 6 +++++- 2 files changed, 10 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 39cc2893426..d883cbb2236 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2005-09-10 Pascal Dupuis (tiny change) + + * progmodes/octave-inf.el (inferior-octave-startup): Resync + current dir at the end. + 2005-09-10 Emilio C. Lopes * woman.el (woman-topic-at-point-default): Renamed to diff --git a/lisp/progmodes/octave-inf.el b/lisp/progmodes/octave-inf.el index 917016cf159..4f0875bbf99 100644 --- a/lisp/progmodes/octave-inf.el +++ b/lisp/progmodes/octave-inf.el @@ -248,7 +248,11 @@ startup file, `~/.emacs-octave'." ;; And finally, everything is back to normal. (set-process-filter proc 'inferior-octave-output-filter) - (run-hooks 'inferior-octave-startup-hook))) + (run-hooks 'inferior-octave-startup-hook) + (run-hooks 'inferior-octave-startup-hook) + ;; Just in case, to be sure a cd in the startup file + ;; won't have detrimental effects. + (inferior-octave-resync-dirs))) (defun inferior-octave-complete () -- 2.39.5