(global-set-key "\C-b" 'compile)
(global-set-key "\C-n" 'next-error)
(defun edt () (interactive) (edt-emulation-on))
(defun ked () "KED-Emulation einschalten" (interactive)
  (load-file "~/ked.emacs"))

;(edt-emulation-on)
;(standard-display-european 1)	;fuer ISO-LATIN1-Umlaute
(setq locale-coding-system 'utf-8)  ;für UTF8-Umlaute
(set-terminal-coding-system 'utf-8)
;(set-keyboard-coding-system 'utf-8) ;macht Mist bei der Eingabe
(set-selection-coding-system 'utf-8)
(prefer-coding-system 'utf-8)

(defun anfzeichen () "Korrektur fuer seltsame Tastatur" (interactive)
  (insert-char ?' 1))
(global-set-key "\C-^" 'anfzeichen)
(defun geschklamauf () "Korrektur fuer VAX-Tastatur" (interactive)
  (insert-char ?{ 1))
;(global-set-key "\C-A" 'geschklamauf)
(defun geschklamzu () "Korrektur fuer VAX-Tastatur" (interactive)
  (insert-char ?} 1))
(global-set-key "\C-D" 'geschklamzu)
