From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Thu, 14 Nov 2013 20:20:11 +0000 (-0500)
Subject: * lisp/progmodes/gud.el (ctl-x-map): Remove C-x SPC binding.
X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~387^2~825
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5d9d9451d3978338a3539594c42c479e719ad9b4;p=emacs.git

* lisp/progmodes/gud.el (ctl-x-map): Remove C-x SPC binding.
(gud-jdb-find-source-using-classpath): Remove ((lambda (..)..)..).
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1177d14a6e9..fd4ed2aead4 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-11-14  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* progmodes/gud.el (ctl-x-map): Remove C-x SPC binding.
+	(gud-jdb-find-source-using-classpath): Remove ((lambda (..)..)..).
+
 2013-11-14  Bozhidar Batsov  <bozhidar@batsov.com>
 
 	* subr.el (version-regexp-alist):
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el
index 14f6aa154d7..4097a9cd97e 100644
--- a/lisp/progmodes/gud.el
+++ b/lisp/progmodes/gud.el
@@ -66,7 +66,7 @@ pdb (Python), and jdb."
   :group 'gud)
 
 (global-set-key (vconcat gud-key-prefix "\C-l") 'gud-refresh)
-(define-key ctl-x-map " " 'gud-break)	;; backward compatibility hack
+;; (define-key ctl-x-map " " 'gud-break); backward compatibility hack
 
 (defvar gud-marker-filter nil)
 (put 'gud-marker-filter 'permanent-local t)
@@ -2159,10 +2159,8 @@ relative to a classpath directory."
 		    (split-string
 		     ;; Eliminate any subclass references in the class
 		     ;; name string. These start with a "$"
-		     ((lambda (x)
-			(if (string-match "$.*" x)
-			    (replace-match "" t t x) p))
-		      p)
+                     (if (string-match "$.*" p)
+                         (replace-match "" t t p) p)
 		     "\\.") "/")
 	 ".java"))
        (cplist (append gud-jdb-sourcepath gud-jdb-classpath))