                                          (string-match ".pases$" x))
                                        (directory-files pases-source-dir nil "^wl"))))
           (when wl-name-list
-            (defvar wl-resource-rep (concat pases-source-dir
-                                            (file-name-as-directory
-                                             (car (last wl-name-list))))
-              "Wanderlust resource repository.")))))
-  (defvar)) ; used in `confs/mail.el'
+            (setq wl-resource-rep (concat pases-source-dir
+                                          (file-name-as-directory
+                                           (car (last wl-name-list)))))))))
+  (let ((wl-lib (locate-library "wl")))
+    (unless (null wl-lib)
+            (setq wl-resource-rep (expand-file-name
+                                   (file-name-directory
+                                    (directory-file-name
+                                     (file-name-directory wl-lib)))))))) ; used in `confs/mail.el'
  
 ;;; FIRST TIME

(defvar mars/local-conf-path (list "confs" "confs/init"))
(defvar mars/site-lisp-path (list "lisp")) ; subdirs are loaded in 'load-path too (FIXME: need reboot .emacs if Custom)
(defvar wl/pases-install nil "True if Wanderlust is a PASES package.")

(if wl/pases-install
    (let ((pases-source-dir (expand-file-name
                             (concat

;; Maintainer:
;; Created: Wed Feb 23 11:22:37 2011 (+0100)
;; Version:
;; Last-Updated: Mon Oct 10 18:43:05 2011 (+0200)
;;           By: Martial Boniou
;;     Update #: 81
;; URL:
;; Keywords:
;; Compatibility:
