language settings

[Raimund Kohl-Fuechsle]

Hello there,

I've to admit: I am close to being driven nuts!

I am running Debian Sarge on my Notebook (an old one, btw).  I
reinstalled Sarge a couple of days ago and since that I seem no longer
to be able to let emacs come up with the german Umlaute (I am using a
US keyboard).  Up to that reinstallation I just used Ctrl \ and mule
behaved the (I think usual) way to show an "a" with two dots above
after pressing "a

Nowadays this aint gonna work no more ... and I don't know why.  I
suppose I made a stupid mistake but obviously I am too blind to see
it.  Can anybody help?

I thought it wouldn't be to bad to see my .emacs ... so here it is:

-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-w

(server-start)

(add-to-list 'load-path "~/emacs-lisp")


(custom-set-variables
  ;; custom-set-variables was added by Custom -- don't edit or cut/paste
it!
  ;; Your init file should contain only one such instance.
 '(abbrev-mode t)
 '(all-christian-calendar-holidays t)
 '(auto-compression-mode t nil (jka-compr))
 '(baud-rate 19200)
 '(calendar-latitude 49.27)
 '(calendar-longitude 8.21)
 '(calendar-location-name "Mutterstadt, LU")
 '(calendar-week-start-day 1)
 '(case-fold-search t)
 '(confirm-kill-emacs (quote y-or-n-p))
 '(current-language-environment "Latin-9")
 '(default-input-method "latin-9-prefix")
 '(display-time-mode t nil (time))
 '(european-calendar-style t)
 '(global-font-lock-mode t nil (font-lock))
 '(global-hl-line-mode t nil (hl-line))
 '(highlight-completion-mode t nil (highlight-completion))
 '(input-method-verbose-flag nil)
 '(iso-ascii-convenient t)
 '(latin1-display t nil (latin1-disp))
 '(mail-abbrevs-mode t nil (mailabbrev))
 '(mail-abbrevs-only nil)
 '(mark-diary-entries-in-calendar t)
 '(midnight-mode t nil (midnight))
 '(require-final-newline t)
 '(show-paren-mode t nil (paren))
 '(text-mode-hook (quote (turn-on-auto-fill text-mode-hook-identify)))
 '(transient-mark-mode t)
 '(uniquify-buffer-name-style (quote forward) nil (uniquify))
 '(view-diary-entries-initially t))
(custom-set-faces
  ;; custom-set-faces was added by Custom -- don't edit or cut/paste it!
  ;; Your init file should contain only one such instance.
 )

(require 'planner)
(plan)

(autoload 'remember "remember" nil t)
(autoload 'remember-region "remember" nil t)
(autoload 'remember "remember" nil t)
(autoload 'remember-region "remember" nil t)
(define-key global-map [f8] 'remember-to-planner)
(define-key global-map [f9] 'remember-region)

(require 'remember-planner)
(setq remember-handler-functions '(remember-planner-append))
(setq remember-annotation-functions planner-annotation-functions)

(require 'planner-id)
(require 'planner-notes-index)
(require 'emacs-wiki-table)

(require 'planner-cyclic)
(setq planner-cyclic-diary-nag nil)

(require 'planner-diary)
(planner-diary-insinuate)

(require 'pg)

(add-hook 'diary-display-hook 'fancy-diary-display)
(add-hook 'list-diary-entries-hook 'sort-diary-entries t)

(add-hook 'list-diary-entries-hook 'include-other-diary-files)
(add-hook 'mark-diary-entries-hook 'mark-included-diary-files)

(require 'tex-site)

(add-hook 'LaTeX-mode-hook '(lambda () (outline-minor-mode 1)))

(setq TeX-auto-save t)    ; Enable parsing of TeX files when they are
saved.
(setq TeX-parse-self t)   ; Enable parsing of files when they are
loaded.
(setq-default TeX-master nil)

(if window-system (require
     'font-latex))

(add-hook 'text-mode-hook 'turn-on-auto-fill)

; ---- language-env DON'T MODIFY THIS LINE!
; $Id: emacs,v 1.4 1998/02/20 18:35:26 leutloff Exp leutloff $

;;--- support european keys ------------------------------- 
(set-input-mode  (car (current-input-mode))
                 (nth 1 (current-input-mode))
                 0)

; `standard-display-european' is semi-obsolete and conflicts
; with multibyte characters. `set-language-environment' is
; a substitute.
(standard-display-european t)

; don't use non-ascii (i.e. german umlauts) as word delimiter
(if (>= emacs-major-version 21)
    (progn
      (set-language-environment "Latin-9")
      (setq selection-coding-system 'compound-text-with-extensions)
    )
    (if (>= emacs-major-version 20)
        (set-language-environment "Latin-1")
        (require 'iso-syntax)))
(require 'disp-table)

;;--- redefine some keys ----------------------------------
;(global-set-key [backspace] 'backward-delete-char-untabify)
; the following line should not break delete char during incremental
; search - has this other disadvantages?
(global-set-key "\177" 'backward-delete-char-untabify)
(global-set-key [delete] 'delete-char)
(global-set-key [home] 'beginning-of-line)
(global-set-key [end] 'end-of-line)
;(global-set-key [C-home] 'beginning-of-buffer)
;(global-set-key [C-end] 'end-of-buffer)
; entries needed by XEmacs:
(global-set-key [(control home)] 'beginning-of-buffer)
(global-set-key [(control end)] 'end-of-buffer)
;;--- Names for calendar command -------------------------
(defvar calendar-day-name-array
  ["Son" "Mon" "Die" "Mit" "Don" "Fre" "Sam"])
(defvar calendar-month-name-array
  ["Januar" "Februar" "März" "April" "Mai" "Juni" 
   "Juli" "August" "September" "Oktober" "November" "Dezember"])
; ---- language-env end DON'T MODIFY THIS LINE!


-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-

Any help is very much appreciated :-)

thank in advance

ray