emacs: fix 256 colors support in screen

1 files changed, 11 insertions, 1 deletions

diff --git a/emacs b/emacs
index 6abc971..0eef7a0 100644
--- a/emacs
+++ b/emacs
@@ -36,6 +36,16 @@
 ;;   - http://www.brockman.se/software/zenburn/zenburn.el
 (color-theme-zenburn)
 
+;; Support 256 colors in screen
+;;   - http://article.gmane.org/gmane.emacs.devel/109504/
+(if (not (window-system)) (load "term/rxvt"))
+(defun terminal-init-screen ()
+  "Terminal initialization function for screen."
+  ;; Use the rxvt color initialization code.
+  (rxvt-register-default-colors)
+  (tty-set-up-initial-frame-faces)
+)
+
 
 ;; Don't show the welcome message
 (setq inhibit-startup-screen t)
@@ -173,7 +183,7 @@
 (setq kill-read-only-ok 1)
 
 ;; Partially integrate the kill-ring and X cut-buffer
-(setq x-select-enable-clipboard t)
+;(setq x-select-enable-clipboard t)
 
 ;; Copy/paste with accentuation intact
 (setq selection-coding-system 'compound-text-with-extensions)