Re: gud.el gdb --cd and libtool

[Richard Stallman <rms@gnu.org>]

Does this change fix it?

*** gud.el.~1.161.~	Mon Oct 21 15:26:25 2002
--- gud.el	Sat Nov  9 05:53:52 2002
***************
*** 406,413 ****
    (interactive (list (gud-query-cmdline 'gdb)))
  
    (gud-common-init command-line
! 		   #'(lambda (file args)
! 		       `("-cd" ,(expand-file-name default-directory) . ,args))
  		   'gud-gdb-marker-filter 'gud-gdb-find-file)
    (set (make-local-variable 'gud-minor-mode) 'gdb)
  
--- 406,412 ----
    (interactive (list (gud-query-cmdline 'gdb)))
  
    (gud-common-init command-line
! 		   #'(lambda (file args) args)
  		   'gud-gdb-marker-filter 'gud-gdb-find-file)
    (set (make-local-variable 'gud-minor-mode) 'gdb)
  
***************
*** 2233,2238 ****
--- 2232,2238 ----
  (defun gud-common-init (command-line massage-args marker-filter &optional find-file)
    (let* ((words (split-string command-line))
  	 (program (car words))
+ 	 (dir default-directory)
  	 ;; Extract the file name from WORDS
  	 ;; and put t in its place.
  	 ;; Later on we will put the modified file name arg back there.
***************
*** 2256,2261 ****
--- 2256,2262 ----
  		      file-subst)))
  	 (filepart (and file-word (concat "-" (file-name-nondirectory file)))))
      (pop-to-buffer (concat "*gud" filepart "*"))
+     (setq default-directory dir)
      ;; Set default-directory to the file's directory.
      (and file-word
  	 gud-chdir-before-run