--- rat/lonwrapper.pm 2006/11/30 23:35:38 1.25 +++ rat/lonwrapper.pm 2008/03/03 19:57:28 1.28 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Wrapper for external and binary files as standalone resources # -# $Id: lonwrapper.pm,v 1.25 2006/11/30 23:35:38 banghart Exp $ +# $Id: lonwrapper.pm,v 1.28 2008/03/03 19:57:28 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -68,7 +68,11 @@ sub wrapper { my %layout = ('border' => 0); if ($env{'environment.remote'} eq 'off') { - $layout{'rows'} = "180,*"; + if ($env{'environment.icons'} eq 'iconsonly') { + $layout{'rows'} = "100,*"; + } else { + $layout{'rows'} = "200,*"; + } } else { $layout{'rows'} = "1,*"; $topurl = "/adm/rat/empty.html"; @@ -122,7 +126,7 @@ sub handler { $orgurl.=(($orgurl=~/\?/)?'&':'?').'wrapperdisplay=menu'; $url=~s/^\/adm\/wrapper//; my $is_ext = $url =~ m|^/ext/|; - $url=~s/^\/ext\//http\:\/\//; + $url=~s{^/ext/}{http://}; $url=~s|http://https://|https://|; $url=~s|:|:|g; #