Index: openacs-4/packages/beehive/www/duplicate2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/beehive/www/duplicate2.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/beehive/www/duplicate2.tcl	10 Jul 2006 02:21:10 -0000	1.3
+++ openacs-4/packages/beehive/www/duplicate2.tcl	27 Dec 2006 05:57:26 -0000	1.4
@@ -87,11 +87,11 @@
 
 # to upload file for withe board drawing  
 	if {$t20 == "checked" || $t11 == "checked"  || $t30 == "checked" } {
-		         
+		    for {set i 1} {$i <= $slnw} {incr i} {     
 
 
-			set filename1 [subst {$pth/packages/beehive/www/slides/[subst {sess$number}]Slide.jpg}]     
-			set filename2 [subst {$pth/packages/beehive/www/slides/[subst {sess$number1}]Slide.jpg}]  
+			set filename1 [subst {$pth/packages/beehive/www/slides/[subst {sess$number}]Wlide$i.jpg}]     
+			set filename2 [subst {$pth/packages/beehive/www/slides/[subst {sess$number1}]Wlide$i.jpg}]  
 			set ifp [open $filename1 r]
 			set ofp [open $filename2 w]
                         fconfigure $ifp -translation binary
@@ -102,8 +102,8 @@
 
 			close $ifp
 			close $ofp
+              }
 
-
 			
 	}