From b2f417180435b8612e09ab5739834ac04d87dd2f51339adce055b6a645317aa0 Mon Sep 17 00:00:00 2001
From: "Dr. Werner Fink" <werner@suse.com>
Date: Fri, 27 Nov 2015 14:13:56 +0000
Subject: [PATCH] .

OBS-URL: https://build.opensuse.org/package/show/M17N/xemacs?expand=0&rev=90
---
 site-start.el | 21 ++++++++++++++++++++-
 1 file changed, 20 insertions(+), 1 deletion(-)

diff --git a/site-start.el b/site-start.el
index 450e441..1f10f3e 100644
--- a/site-start.el
+++ b/site-start.el
@@ -20,7 +20,26 @@
 ;; Enable mouse wheel support
 ;;
 
-(mwheel-install)
+(when window-system
+  (mwheel-install))
+
+;; Let gnus save articles in mbox format
+(defvar gnus-default-article-saver 'gnus-summary-save-in-file)
+
+;; This system use terminfo
+(defvar system-uses-terminfo t)
+
+;; Syntax highlighting
+(when (fboundp 'turn-on-lazy-lock)
+  (require 'font-lock)
+  ;; use lazy-lock by default if lazy-shot is not enabled
+  (remove-hook 'font-lock-mode-hook 'turn-on-lazy-lock)
+  (add-hook 'font-lock-mode-hook
+	    (function
+	     (lambda ()
+		(unless (and (boundp 'lazy-shot-mode) lazy-shot-mode)
+		  (turn-on-lazy-lock))))
+	    t))
 
 ;;
 ;; i18n setup (encoding, language-environment, ...)