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 4de118e9a6a8cd66a5269d23e6573e60121dc3bf
parent 8748900b011534373426d2d9a0ee4fb33d01fe8c
Author: Commit-Bot <unknown>
Date:   Fri, 13 Aug 2010 06:35:32 +0000

Automatic commit from picoLisp.tgz, From: Fri, 13 Aug 2010 06:35:32 GMT
Diffstat:
Mlib/form.js | 10++++++----
1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/lib/form.js b/lib/form.js @@ -1,4 +1,4 @@ -/* 10aug10abu +/* 13aug10abu * (c) Software Lab. Alexander Burger */ @@ -42,9 +42,11 @@ function doDrag(event) { function doDrop(btn, event) { doDrag(event); - Btn.push(Drop = btn); - btn.value = "0 %"; - post(btn.form, event.dataTransfer.files[0]); + if (event.dataTransfer.files.length != 0) { + Btn.push(Drop = btn); + btn.value = "0 %"; + post(btn.form, event.dataTransfer.files[0]); + } } function dropProgress(event) {