.

OBS-URL: https://build.opensuse.org/package/show/M17N/xemacs?expand=0&rev=90

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, ...)