Index: openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl,v
diff -u -r1.95.4.3 -r1.95.4.4
--- openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl	8 Sep 2014 08:06:30 -0000	1.95.4.3
+++ openacs-4/packages/dotlrn-fs/tcl/dotlrn-fs-procs.tcl	10 Sep 2014 12:12:25 -0000	1.95.4.4
@@ -730,7 +730,10 @@
     } {
 
         if {[content::extlink::is_extlink -item_id $object_id]} {
-            item::copy -item_id $object_id -target_folder_id $target_folder_id
+
+	    content::item::copy -item_id $item_id  -target_folder_id $target_folder_id \
+		-creation_user $user_id -creation_ip [ad_conn peeraddr]
+
         } elseif {[fs::folder_p -object_id $object_id]} {
             
             set name [fs_get_folder_name $object_id]