[cmucl-ticket] [cmucl] #31: pathname bug with :case :common

[cmucl]

#31: pathname bug with :case :common
--------------------+-------------------------------------------------------
 Reporter:  rtoy    |       Owner:  somebody
     Type:  defect  |      Status:  new     
 Priority:  minor   |   Milestone:          
Component:  Core    |     Version:  2009-02 
 Keywords:          |  
--------------------+-------------------------------------------------------
 Paul Foley reports:
 {{{
 (pathname-directory "/tmp/Foo/BAR/" :case :common)
    Actual result:   (:ABSOLUTE "tmp" "Foo" "BAR")
    Correct result:  (:ABSOLUTE "TMP" "Foo" "bar")
 }}}

 The problem is {{{MAYBE-DIDDLE-CASE}}} looks for mixed case across the
 entire list, rather than looking at each element separately.

-- 
Ticket URL: <http://common-lisp.net:8000/cmucl/ticket/31>
cmucl <http://common-lisp.net/project/cmucl>
cmucl