; .emacs

(setq diremacs "/home/varia/Emacs.el")
(setq load-path (append load-path (list diremacs)))

(let ((files (directory-files diremacs nil ".*\.el$" nil)))
  (while files (load (car files)) (setq files (cdr files))))

(load "fondamentale")