# HG changeset patch # User Richard M. Stallman # Date 794133244 0 # Node ID 892c03bfe161e651ef65ed74a140bd6bd21c0ea8 # Parent 715419786d7f4d79c41d8de4a18fbb696cca37cc (gud-massage-args): Variable and function deleted. (gud-common-init): Don't set the variable. diff -r 715419786d7f -r 892c03bfe161 lisp/gud.el --- 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)