[Emacs-diffs] trunk r115106: * lisp/progmodes/gud.el (ctl-x-map): Remove C-x SPC binding.

[Stefan Monnier]

------------------------------------------------------------
revno: 115106
revision-id: address@hidden
parent: address@hidden
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Thu 2013-11-14 15:20:11 -0500
message:
  * lisp/progmodes/gud.el (ctl-x-map): Remove C-x SPC binding.
  (gud-jdb-find-source-using-classpath): Remove ((lambda (..)..)..).
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/progmodes/gud.el          gud.el-20091113204419-o5vbwnq5f7feedwu-2927

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-11-14 17:07:03 +0000
+++ b/lisp/ChangeLog    2013-11-14 20:20:11 +0000
@@ -1,3 +1,8 @@
+2013-11-14  Stefan Monnier  <address@hidden>
+
+       * progmodes/gud.el (ctl-x-map): Remove C-x SPC binding.
+       (gud-jdb-find-source-using-classpath): Remove ((lambda (..)..)..).
+
 2013-11-14  Bozhidar Batsov  <address@hidden>
 
        * subr.el (version-regexp-alist):

=== modified file 'lisp/progmodes/gud.el'
--- a/lisp/progmodes/gud.el     2013-09-18 05:19:28 +0000
+++ b/lisp/progmodes/gud.el     2013-11-14 20:20:11 +0000
@@ -66,7 +66,7 @@
   :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 @@
                    (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))