From 7fe2ae672055afe911ee4b21e475d269001cc7d3 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Thu, 3 Jul 2014 21:35:23 -0400 Subject: [PATCH] * lisp/progmodes/octave.el (inferior-octave-mode): Set comint-input-ring-size to a number. Fixes: debbugs:17912 --- lisp/ChangeLog | 5 +++++ lisp/progmodes/octave.el | 7 ++++--- 2 files changed, 9 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 78235d76879..021b0693654 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2014-07-04 Stefan Monnier + + * progmodes/octave.el (inferior-octave-mode): + Set comint-input-ring-size to a number (bug#17912). + 2014-07-03 Juri Linkov * desktop.el (desktop-minor-mode-table): Add `defining-kbd-macro' diff --git a/lisp/progmodes/octave.el b/lisp/progmodes/octave.el index 3fdcec219d3..25b081545a3 100644 --- a/lisp/progmodes/octave.el +++ b/lisp/progmodes/octave.el @@ -747,9 +747,10 @@ Key bindings: (setq-local info-lookup-mode 'octave-mode) (setq-local eldoc-documentation-function 'octave-eldoc-function) - (setq comint-input-ring-file-name - (or (getenv "OCTAVE_HISTFILE") "~/.octave_hist") - comint-input-ring-size (or (getenv "OCTAVE_HISTSIZE") 1024)) + (setq-local comint-input-ring-file-name + (or (getenv "OCTAVE_HISTFILE") "~/.octave_hist")) + (setq-local comint-input-ring-size + (string-to-number (or (getenv "OCTAVE_HISTSIZE") "1024"))) (comint-read-input-ring t) (setq-local comint-dynamic-complete-functions inferior-octave-dynamic-complete-functions) -- 2.11.4.GIT