(auto-mode-alist): Match more valid gdb init

file names.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 129b9aab8e7564c05e46ffce6a6f8b882bcd3c5f..dee447a17208538652d5a59258b0de767c8bf5b9 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-07-03  Dan Nicolaescu  <dann@ics.uci.edu>
+
+       * progmodes/gud.el (auto-mode-alist): Match more valid gdb init
+       file names.
+
 2007-07-02  Martin Rudalics  <rudalics@gmx.at>
 
        * help-mode.el (help-make-xrefs): Skip spaces too when skipping tabs. 

diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el
index e557fdef8430b43e6a6916ea2c20ecd478f0fba5..536d8c4cfc1c48583224ecdc6d9aac16df796a8e 100644 (file)
--- a/lisp/progmodes/gud.el
+++ b/lisp/progmodes/gud.el
@@ -3193,8 +3193,12 @@ Treats actions as defuns."
     (goto-char (point-max)))
   t)
 
+;; Besides .gdbinit, gdb documents other names to be usable for init
+;; files, cross-debuggers can use something like
+;; .PROCESSORNAME-gdbinit so that the host and target gdbinit files
+;; don't interfere with each other.
 ;;;###autoload
-(add-to-list 'auto-mode-alist '("/\\.gdbinit" . gdb-script-mode))
+(add-to-list 'auto-mode-alist '("/\\.[a-z0-9-]*gdbinit" . gdb-script-mode))
 
 ;;;###autoload
 (define-derived-mode gdb-script-mode nil "GDB-Script"