;; Fichier de configuration pour Emacs/XEmacs
;; Laure Gonnord, octobre 2010.

(custom-set-variables
 '(case-fold-search t)
 '(global-font-lock-mode t nil (font-lock))
 '(gnuserv-program (concat exec-directory "/gnuserv"))
 '(inhibit-startup-screen t)
 '(load-home-init-file t t)
)

;;pour les copier-coller 
(setq auto-indent nil)


;;----------------------- BUFFERS - SHELL -----------------

;;pour eviter les lignes inutiles a la fin d'un fichier
(setq next-line-add-newlines nil) 

;; le bip 
(setq visible-bell 't)



;; MOVING THE CURSOR IN THE BUFFER

;; when moving the cursor to the bottom/top of screen, scroll up/down 2 lines
(setq scroll-step 3)
;; when moving page up/down, keep 1 line in common
(setq next-screen-context-lines 1)

(global-set-key [home]    'beginning-of-line)
(global-set-key [end]     'end-of-line)

;; Le curseur reste toujours à la même position quand on scroll
(setq scroll-preserve-screen-position t)

;; Une touche DEL qui fait vraiment DEL !!!
(and
 window-system
 (functionp 'normal-erase-is-backspace-mode)
 (normal-erase-is-backspace-mode nil))


;;Histoire de savoir sur quel fichier précisément on travaille. 
(setq frame-title-format '(buffer-file-name "Emacs: %b (%f)" "Emacs: %b")) 


;;---------------------------La modeline ------------------------

(setq column-number-mode t)
(setq line-number-mode t)

(setq display-time-string-forms
      '((format "[%s/%s/%s]-[%s:%s] " day month year 24-hours minutes )
	))

;; horloge
(display-time)