Custom Query (1030 matches)

rename-file filespec new-name should supply missing components of new-name from filespec, which it does wrong in the case of (rename-file (make-pathname :name "x.s") "y"). Presently CCL (1.8 and trunk on linuxx86) renames "x.s" to "y.s" because it resolves supplied filespec into its truename via intermediate conversion to a native namestring before supplying defaults.

This is a fix:

--- lib/pathnames.lisp.orig
+++ lib/pathnames.lisp.new
@@ -98,7 +98,7 @@
   file, then the associated file is renamed."
   (let* ((original (truename file))
         (original-namestring (native-translated-namestring original))
-        (new-name (merge-pathnames new-name original))
+        (new-name (merge-pathnames new-name (merge-pathnames file)))
         (new-namestring (native-translated-namestring new-name)))
     (unless new-namestring
       (error "~S can't be created." new-name))

In trunk, (ccl::choose-file-dialog) sometimes works, but opening a directory then selecting a file causes CCL to crash. This in 1.6-dev-r14201M-trunk, this bug seems to be absent in 1.5-rc1-r13620M. Exception Type: EXC_BAD_ACCESS (SIGSEGV)

Current (CCL v1.7) Get Info dialog shows Copyright Clozure 2002-2009 Clozure Associates and contributors. Version 1.4-dev

When looking for which file "Open with" association application to use, it might make life easier if Get Info was up to date.

This in 1.7-dev-r14416M-trunk (DarwinX8664).