Index: openacs-4/packages/file-storage/www/move.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/move.tcl,v diff -u -r1.9.4.3 -r1.9.4.4 --- openacs-4/packages/file-storage/www/move.tcl 29 Jul 2014 11:14:20 -0000 1.9.4.3 +++ openacs-4/packages/file-storage/www/move.tcl 22 Oct 2014 18:23:55 -0000 1.9.4.4 @@ -134,7 +134,7 @@ db_multirow -extend {move_url level} folder_tree get_folder_tree "" { # teadams 2003-08-22 - change level to level num to avoid # Oracle issue with key words. - if {$folder_in in [concat $not_allowed_parents $not_allowed_children] + if {$folder_id in [concat $not_allowed_parents $not_allowed_children] || $parent_id in $not_allowed_children } { if {$parent_id in $not_allowed_children} {