From: Victor Wagner <vitus@wagner.pp.ru>
Date: Sat, 25 Feb 2006 17:00:09 +0000 (+0000)
Subject: Fixed behavoir when Delete button is hit when description is modified
X-Git-Url: http://wagner.pp.ru/gitweb/?a=commitdiff_plain;h=de8b097e3dfea6874224e662443f3b53d6d71ebb;p=oss%2Fimgwww.git

Fixed behavoir when Delete button is hit when description is modified
---

diff --git a/imgcomment b/imgcomment
index 1b972ac..8b8f6a5 100755
--- a/imgcomment
+++ b/imgcomment
@@ -121,6 +121,9 @@ proc delete_file {index} {
 	}	
 		
 	file delete $filename
+	.info.comment edit reset
+	.info.comment edit modified n
+	
 	if {$index == $filecount-1} {
 		global current
 		set filelist [lrange $filelist 0 [expr $index-1]]