Mercurial > emacs

changeset 10877:892c03bfe161

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(gud-massage-args): Variable and function deleted. (gud-common-init): Don't set the variable.
author Richard M. Stallman <rms@gnu.org>
date Thu, 02 Mar 1995 08:34:04 +0000
parents 715419786d7f
children 9556a4d578f2
files lisp/gud.el
diffstat 1 files changed, 0 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gud.el	Thu Mar 02 08:33:01 1995 +0000
+++ b/lisp/gud.el	Thu Mar 02 08:34:04 1995 +0000
@@ -49,16 +49,11 @@
 (global-set-key (concat gud-key-prefix "\C-l") 'gud-refresh)
 (define-key ctl-x-map " " 'gud-break)	;; backward compatibility hack
 
-(defvar gud-massage-args nil)
-(put 'gud-massage-args 'permanent-local t)
 (defvar gud-marker-filter nil)
 (put 'gud-marker-filter 'permanent-local t)
 (defvar gud-find-file nil)
 (put 'gud-find-file 'permanent-local t)
 
-(defun gud-massage-args (&rest args)
-  (apply gud-massage-args args))
-
 (defun gud-marker-filter (&rest args)
   (apply gud-marker-filter args))
 
@@ -1159,8 +1154,6 @@
 	   (if file-word (funcall massage-args file args) args)))
   ;; Since comint clobbered the mode, we don't set it until now.
   (gud-mode)
-  (make-local-variable 'gud-massage-args)
-  (setq gud-massage-args massage-args)
   (make-local-variable 'gud-marker-filter)
   (setq gud-marker-filter marker-filter)
   (make-local-variable 'gud-find-file)