+vcs-tree (0.3.2-1) unstable; urgency=low
+
+ * New upstream (closes:533984)
+ * control: Update debhelper compat version, standards-version
+ * control: Changed section to lisp
+
+ -- Kevin M. Rosenberg <kmr@debian.org> Mon, 27 Jul 2009 11:21:37 -0600
+
vcs-tree (0.3.1-1) unstable; urgency=low
* Specify an arbitrary, but known to be valid, directory for HOME
Source: vcs-tree
-Section: devel
+Section: lisp
Priority: optional
Maintainer: Kevin M. Rosenberg <kmr@debian.org>
-Build-Depends: debhelper (>> 4.0.0), sbcl (>= 0.9.4)
-Standards-Version: 3.7.2.2
+Build-Depends: debhelper (>> 5.0.0), sbcl (>= 0.9.4)
+Standards-Version: 3.8.2
Package: vcs-tree
Architecture: any
(#+lisp=cl ext:probe-directory #-lisp=cl lisp:probe-directory
path)))
#+(or cmu scl) (eq :directory (unix:unix-file-kind (namestring path)))
+ #+sbcl
+ (let ((file-kind-fun
+ (or (find-symbol "NATIVE-FILE-KIND" :sb-impl)
+ (find-symbol "UNIX-FILE-KIND" :sb-unix))))
+ (when (eq :directory (funcall file-kind-fun (namestring path)))
+ path))
#+lispworks (lw:file-directory-p path)
- #+sbcl (eq :directory (sb-unix:unix-file-kind (namestring path)))
#-(or allegro clisp cmu lispworks sbcl scl)
(probe-file path)))