Comment 4 for bug 985103

I thought the pathname-prefix function is more clear in its intention and more convenient, too. And it would be reusable. But if you don't like it than take your solution as long as the bug gets fixed.