]> code.delx.au - gnu-emacs-elpa/commitdiff
xsel.el - put point after pasted stuff, abbreviate :10.0
authorKen Manheimer <ken.manheimer@gmail.com>
Mon, 28 Sep 2015 22:46:34 +0000 (18:46 -0400)
committerKen Manheimer <ken.manheimer@gmail.com>
Mon, 28 Sep 2015 22:46:34 +0000 (18:46 -0400)
xsel.el

diff --git a/xsel.el b/xsel.el
index a69a81d8cab43dd008f25070ca697e57c71f7166..2d7d7d81988f835805f404e9c0086d2fc312d603 100644 (file)
--- a/xsel.el
+++ b/xsel.el
@@ -29,7 +29,7 @@ Returns the resulting value for DISPLAY."
   (when (or arg (not (getenv "DISPLAY")))
     (setenv "DISPLAY"
             (read-from-minibuffer "DISPLAY: "
-                                  (or (getenv "DISPLAY") "localhost:10.0"))))
+                                  (or (getenv "DISPLAY") ":10.0"))))
   (getenv "DISPLAY")
   )
 
@@ -54,4 +54,5 @@ Returns the resulting value for DISPLAY."
                          ;; Linux &c:
                          (t "xsel --output --clipboard"))))
       (shell-command command 1)
+      (exchange-point-and-mark)
       )))