chiark / gitweb /
el/dot-emacs.el: Don't try to select a track after the last line.
authorMark Wooding <mdw@distorted.org.uk>
Thu, 20 Jul 2017 00:18:46 +0000 (01:18 +0100)
committerMark Wooding <mdw@distorted.org.uk>
Thu, 20 Jul 2017 00:18:46 +0000 (01:18 +0100)
el/dot-emacs.el

index 5f2708502af9edae62e11111c924be29f9f9e168..6b2525f0a1feaf908291c5b7333f5db0455497fd 100644 (file)
@@ -3857,7 +3857,8 @@ (defun mdw-mpc-hack-lines (arg interactivep func)
               (decf n)))))))
 
 (defun mdw-mpc-select-one ()
-  (unless (get-char-property (point) 'mpc-select)
+  (when (and (get-char-property (point) 'mpc-file)
+            (not (get-char-property (point) 'mpc-select)))
     (mpc-select-toggle)))
 
 (defun mdw-mpc-unselect-one ()