Éditeur de texte hyper polyvalent. Et trop de la balle... je ferais bien un petit tutorial dessus, mais il y en a déjà tellement. Comme Emacswiki.org par exemple.

En fait il suffit de changer le coding system du buffer :

En fait il suffit de changer le coding system de la commande d’ouverture du fichier :

Binaire : ftp.exe.txt Decrire le probleme du serveur avec des messages en francais ⇒ modif de ange-ftp

(set-default-coding-systems 'iso-8859-15)
(prefer-coding-system 'utf-8)
(set-frame-font "-outline-Courier New-normal-r-normal-normal-18-97-96-96-c-*-iso8859-1")
(set-background-color "black")
(menu-bar-mode nil)
(set-foreground-color "LightSteelBlue")
(set-cursor-color "Pink")
(setq ange-ftp-ftp-program-name "D:/goinfre/exe/ftp.exe")
(setq ange-ftp-tmp-name-template "d:/goinfre/emacs-21.3/tmp")
(setq ange-ftp-gateway-tmp-name-template "d:/goinfre/emacs-21.3/tmp")
(setq ange-ftp-default-user "user")
(setq ange-ftp-default-password "passwd")
(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.
 '(case-fold-search t)
 '(current-language-environment "Latin-1")
 '(default-input-method "latin-1-prefix")
 '(inverse-video 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.
 )
 
(autoload 'multi-mode
  "multi-mode"
  "Allowing multiple major modes in a buffer."
  t)
 
(load "d:/goinfre/Download/nxml-mode-20041004/rng-auto.el")
(load "php-mode");
(require 'cl) 
(defun xul-mode () (interactive)
  (multi-mode 1
 	      'nxml-mode
	      '("<script" java-mode)
	      '("</script" nxml-mode-mode)))
 
(setq auto-mode-alist
          (append '(("\\.pc$" . c-mode)
                     ("\\.lsp$" . lisp-mode)
                     ("\\.scm$" . scheme-mode)
                     ("\\.pl$" . cperl-mode)
                     ("\\.pm$" . cperl-mode)
                     ("\\.php$" . php-mode)
		     ("\\.xml$" . nxml-mode)
		     ("\\.xul$" . xul-mode)
                     ) auto-mode-alist))
 
 
(setq zmacs-regions nil)
(load "desktop")
(desktop-load-default)
(desktop-read)
 
;; Custom european stuff
 
(add-hook 'diary-display-hook 'fancy-diary-display)
(add-hook 'list-diary-entries-hook 'sort-diary-entries)
(setq mark-diary-entries-in-calendar t)
(setq european-calendar-style t)
(setq all-christian-calendar-holidays t)
(setq calendar-date-display-form 
      '((if dayname (concat dayname ", ")) day " " monthname " " year))
(setq calendar-time-display-form
      '(24-hours ":" minutes
		 (if time-zone " (") time-zone (if time-zone ")")))
(setq ps-paper-type 'a4)
 
;; Time set and display
 
(setq display-time-day-and-date t
      display-time-24hr-format t)
(display-time)
 
 
;;(when (fboundp 'zone)
;;  (require 'zone)
;;  (setq zone-idle 300)
;;  (zone-when-idle 300))
(fset 'print-buffer 'generic-print-buffer)
 
;; Variables for sql.el
(setq sql-user "user")
(setq sql-password "passwd")
(setq sql-database nil)
(setq sql-server nil)
(setq sql-oracle-program "plus33")
 
(put 'downcase-region 'disabled nil)
 
(put 'upcase-region 'disabled nil)
(global-font-lock-mode)