Chargement dépendances phafi-mode

scripts/emacs/phafi-autoload.el

@@ -23,9 +23,33 @@
 ;; Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 
 ;; Load dependencies of phpafi-mode
+(defun phafi-autoload-load (subdir)
+  (let ((current-dir (file-name-directory load-file-name)))
+    (add-to-list 'load-path (concat current-dir subdir))
+    )
+)
 
-(add-to-list 'load-path "phpmode-1.10")
-(add-to-list 'load-path "magit-1.2.0")
-(add-to-list 'load-path "geben-0.26")
-(add-to-list 'load-path "nxhtml-2.08-100425")
+(phafi-autoload-load "phpmode-1.10")
+(phafi-autoload-load "magit-1.2.0")
+(phafi-autoload-load "geben-0.26")
+(phafi-autoload-load "nxhtml-2.08-100425")
 
+(require 'php-mode)
+(add-to-list 'auto-mode-alist  '("\\.php[34]?\\'\\|\\.phtml\\'" . php-mode))
+(load "nxhtml-2.08-100425/autostart.el")
+(add-to-list 'auto-mode-alist  '("\\.phtml\\'" . nxhtml-mumamo-mode))
+
+(require 'magit)
+(require 'magit-svn)
+(add-hook 'magit-mode-hook 'turn-on-magit-svn)
+
+(require 'nxhtml-autostart)
+
+(defun phafi-autoload-php-mode()
+  (autoload 'phafi-mode "phafi-mode" "PHAFI mode")
+  (phafi-mode))
+
+(add-hook 'php-mode-hook 'phafi-autoload-php-mode t)
+
+(unless (featurep 'phafi-autoload)
+  (provide 'phafi-autoload))