;;; Beginn Konfiguration fuer SICStus Prolog
;; Laden der Emacs-Initialisierungsdatei sicstus_emacs_init.el
;; Die folgende Zeile muss angepasst werden, falls SICStus Prolog 
;; nicht in "/Applications/" installiert wurde. D.H. "/Applications/" durch
;; den effektiven Pfad ersetzen.
;; Wer nicht weiss, wo effektiv installiert wurde, sucht im Finder nach der Datei
;; "sicstus_emacs_init.el"!
(load-file "/Applications/powerpc-apple-darwin/lib/sicstus-3.11.0/emacs/sicstus_emacs_init.el")

;; MacOS X Dinge
;; Damit die alt-Taste auf CH-deutscher Tastatur funktioniert.
(setq mac-command-key-is-meta 1)
;; Damit die RETURN-Taste ein UNIX-Zeilenende ausgibt.
(define-key function-key-map [return] [13])
								   
;; Syntax-Coloring (Font-Locking genannt in Emacs)
;; (Farbige Auszeichnung gewisser Sprachkonstrukte)
(global-font-lock-mode t)
(setq font-lock-maximum-decoration t)

;; Umlaute anzeigen
(standard-display-european t)

;; Standard Farben
(set-background-color "white")
(set-foreground-color "black")
(set-border-color "gray")
(set-cursor-color "dim gray")

;; aktuelle Zeilennummer anzeigen
(setq line-number-display-limit 40000)
(setq line-number-mode t)

;; Backspace-Taste soll Zeichen VOR/UNTER dem Cursor loeschen
(global-set-key "\C-?" 'delete-backward-char)

;; Delete-Taste soll Zeichen HINTER dem Cursor loeschen
(global-set-key [delete] 'delete-char)


;; Zeile anspringen mit Meta-g Kombination
(global-set-key "\M-g" 'goto-line)


;; Markierungen (mit der Maus) anzeigen
(transient-mark-mode 1)

;; Markierungen mit der Eingabe ueberschreiben
(delete-selection-mode 1)

;; das Anlegen von Backup-Dateien (Endung ~) unterdruecken
(setq make-backup-files nil)