picolisp

Unnamed repository; edit this file to name it for gitweb.
git clone https://logand.com/git/picolisp.git/
Log | Files | Refs | README | LICENSE

commit 6f08669e22eb1634b505a9d1e92e23667d20df95
parent 2988c95416710469f75642c5dfc0e445c2463add
Author: Commit-Bot <unknown>
Date:   Tue, 29 Jun 2010 17:49:47 +0000

Automatic commit from picoLisp.tgz, From: Tue, 29 Jun 2010 17:49:47 GMT
Diffstat:
Mlib/form.js | 10+++++-----
1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/lib/form.js b/lib/form.js @@ -1,4 +1,4 @@ -/* 20apr10abu +/* 29jun10abu * (c) Software Lab. Alexander Burger */ @@ -320,17 +320,17 @@ function hintKey(field, event, coy) { } function findHint(str) { - str = str.toLowerCase(); var len = str.length; + for (var i = 0; i < Hint.length; ++i) - if (Hint[i].substr(0,len).toLowerCase() == str) + if (Hint[i].substr(0,len) == str) return i; return -1; } function nextHint(str, i, n) { - str = str.toLowerCase(); var len = str.length; + do { if (n < 0) { if ((i += n) < 0) @@ -340,7 +340,7 @@ function nextHint(str, i, n) { if ((i += n) >= Hint.length) i = 0; } - } while (Hint[i].substr(0,len).toLowerCase() != str); + } while (Hint[i].substr(0,len) != str); return i; }