Changeset 15396


Ignore:
Timestamp:
May 29, 2012, 8:35:41 AM (7 years ago)
Author:
gb
Message:

in LOCAL-SVN-REVISION: Some Cygwin versions of "svnversion" don't
understand native paths, so call CYGPATH if need be.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lib/misc.lisp

    r15108 r15396  
    943943    (multiple-value-bind (status exit-code)
    944944        (external-process-status
    945          (run-program (svnversion-program)  (list  (native-translated-namestring "ccl:") (or (svn-url) "")) :output s :error :output))
     945         (run-program (svnversion-program)  (list (if *use-cygwin-svn*
     946                                                    (cygpath (native-translated-namestring "ccl:"))
     947                                                    (native-translated-namestring "ccl:"))
     948                                                    (or (svn-url) "")) :output s :error :output))
    946949      (when (and (eq :exited status) (zerop exit-code))
    947950        (with-input-from-string (output (get-output-stream-string s))
Note: See TracChangeset for help on using the changeset viewer.