Opened 14 years ago

Closed 14 years ago

#238 closed defect (fixed)

*default-pathname-defaults* with a filename breaks probe-file on directories

Reported by: gz Owned by: gb
Priority: major Milestone:
Component: Runtime (threads, GC) Version:
Keywords: Cc:

Description 

(setq path (make-pathname :name :unspecific
                          :type :unspecific
                          :directory '(:absolute)))
=> #P"/"

(merge-pathnames path "foo.bar")
=> #P"/"

(probe-file path)
=> #P"/"

(let ((*default-pathname-defaults* "foo.bar"))
  (probe-file path))
=> NIL

The first three results are correct. The last is not.

Change History (1)

comment:1 Changed 14 years ago by gz

  • Resolution set to fixed
  • Status changed from new to closed

Fixed in r8932

Note: See TracTickets for help on using tickets.