Fix previous gdb-mi fix...

diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el
index 1a7f184..ab315f9 100644 (file)
--- a/lisp/progmodes/gdb-mi.el
+++ b/lisp/progmodes/gdb-mi.el
@@ -672,7 +672,7 @@ detailed description of this mode.
                      ((string-equal (match-string 1) "size")
                       (setq hsize (match-string 2))))))))
       (and (stringp hsize)
-          (integerp (string-to-number hsize))
+          (integerp (setq hsize (string-to-number hsize)))
           (> hsize 0)
           (set (make-local-variable 'comint-input-ring-size) hsize))
       (if (stringp hfile)