Merge old CVS `ian-dotfiles' repo, as a subtree where we can pick bits

[ian-dotfiles.git] / from-cvs / files / emacs_ian-x.el

diff --git a/from-cvs/files/emacs_ian-x.el b/from-cvs/files/emacs_ian-x.el
new file mode 100644 (file)
index 0000000..2879ecd
--- /dev/null
+++ b/from-cvs/files/emacs_ian-x.el
@@ -0,0 +1,19 @@
+; Ian's X initialisations.
+
+(if (not (string-match "^18\." emacs-version))
+    (require 'ian-x19)
+    
+  (require 'x-fix-mouse)
+  (define-key mouse-map x-button-left-up 'x-cut-text-if-moved)
+  (define-key mouse-map x-button-middle 'x-cut-text)
+  (define-key mouse-map x-button-c-middle 'x-cut-and-wipe-text)
+  (define-key mouse-map x-button-right 'x-paste-text))
+
+; (x-set-cursor-color "white")
+; (x-set-foreground-color "white")
+; (x-set-background-color "black")
+
+(if (boundp 'tool-bar-mode)
+    (tool-bar-mode -1))
+  
+; End of this file.