From 66f5808b81b1df84bc57c4f7b9d487201bc162fb Mon Sep 17 00:00:00 2001 From: forsyth Date: Mon, 2 Aug 2010 14:49:50 +0100 Subject: 20100802-1449 --- appl/lib/NOTICE | 2 +- appl/lib/names.b | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) (limited to 'appl/lib') diff --git a/appl/lib/NOTICE b/appl/lib/NOTICE index a9a7616f..6169ac2f 100644 --- a/appl/lib/NOTICE +++ b/appl/lib/NOTICE @@ -8,7 +8,7 @@ file such as NOTICE, LICENCE or COPYING. Copyright © 1995-1999 Lucent Technologies Inc. Portions Copyright © 1997-2000 Vita Nuova Limited -Portions Copyright © 2000-2007 Vita Nuova Holdings Limited +Portions Copyright © 2000-2010 Vita Nuova Holdings Limited This program is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License (`LGPL') as published by diff --git a/appl/lib/names.b b/appl/lib/names.b index d3a2082e..08bc4875 100644 --- a/appl/lib/names.b +++ b/appl/lib/names.b @@ -120,7 +120,7 @@ isprefix(a: string, b: string): int { la := len a; if(la == 0) - return 0; # "" isnt' a pathname + return 0; # "" isn't a pathname while(la > 1 && a[la-1] == '/') a = a[0:--la]; lb := len b; @@ -128,7 +128,7 @@ isprefix(a: string, b: string): int return 0; if(la == lb) return a == b; - return a == b[0:la] && (b[la] == '/' || a == "/"); + return a == b[0:la] && (a == "/" || b[la] == '/'); } elements(name: string): list of string -- cgit v1.2.3