Index: openacs-4/packages/beehive/www/duplicate2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/beehive/www/duplicate2.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/beehive/www/duplicate2.tcl	10 May 2006 05:38:46 -0000	1.1
+++ openacs-4/packages/beehive/www/duplicate2.tcl	15 Jun 2006 05:51:20 -0000	1.2
@@ -107,33 +107,12 @@
 			
 	}     
 
-# to upload resources file
-	if {$t32 == "checked" } {
-		         
 
-
-			set filename1 [subst {$pth/packages/beehive/www/slides/[subst {sess$number}]$el}]     
-			set filename2 [subst {$pth/packages/beehive/www/slides/[subst {sess$number1}]$el}]  
-			set ifp [open $filename1 r+]
-			set ofp [open $filename2 w+]
-                        fconfigure $ifp -translation binary
-			fconfigure $ofp -translation binary
-
-
-			ns_cpfp $ifp $ofp
-
-			close $ifp
-			close $ofp
-
-			
-					
-	}     
-
 # to upload staged file 
 	if {$t33 == "checked" } {
 		         
-			set filename1 [subst {$pth/packages/beehive/www/slides/[subst {sess$number}]$ig}]     
-			set filename2 [subst {$pth/packages/beehive/www/slides/[subst {sess$number1}]$ig}]  
+			set filename1 [subst {$pth/packages/beehive/www/slides/[subst {sess$number}]$el}]     
+			set filename2 [subst {$pth/packages/beehive/www/slides/[subst {sess$number1}]$el}]  
 			set ifp [open $filename1 r+]
 			set ofp [open $filename2 w+]
                         fconfigure $ifp -translation binary