(defparameter *base-dir* ".")

(defun my-load (basename)
  (let ((fas-name (format nil "~a/~a.fas" *base-dir* basename))
	(lisp-name (format nil "~a/~a.lisp" *base-dir* basename)))
    (if (probe-file fas-name)
      (load fas-name)
      (load lisp-name))))
(my-load "packages")
(my-load "pkgmgr-except")
(my-load "pkgmgr-print")
(my-load "pkgmgr-util")
(my-load "pkgmgr-pkgdb")
(my-load "pkgmanager")
(pkgmanager:run)