1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el
index ab315f9eefd..6aece579d5d 100644
--- a/lisp/progmodes/gdb-mi.el
+++ b/lisp/progmodes/gdb-mi.el
@@ -648,7 +648,7 @@ detailed description of this mode.
   (set (make-local-variable 'gud-minor-mode) 'gdbmi)
   (setq comint-input-sender 'gdb-send)
   (when (ring-empty-p comint-input-ring) ; cf shell-mode
-    (let ((hfile (expand-file-name (or (getenv "GBDHISTFILE")
+    (let ((hfile (expand-file-name (or (getenv "GDBHISTFILE")
                                        (if (eq system-type 'ms-dos)
                                            "_gdb_history"
                                          ".gdb_history"))))