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

#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.