[Ecls-list] error with logical pathname

[Pedro Kröger]

Hi,

I have the following pathname-translation in my initialization file:

(setf (logical-pathname-translations "rameau")
      `(("user-data;*.*.*"      ,(merge-pathnames ".rameau/" (user-homedir-pathname)))
        ("**;*.*.*" "/home/kroger/src/rameau/**/")))

and I use it like this in my code:

(translate-logical-pathname "rameau:lib;")

It works fine with SBCL, but with ecl (today's cvs) I ge the following
error:

;;; Number of wildcards in #P"rameau:**;*.*.*" do not match  #P"/home/kroger/src/rameau/**/"Broken at SI:BYTECODES.Available restarts:

I appreciate any suggestions.

Pedro