Allows epc calls for large icons and outputting phrase as just text r…

…ather than HTML

perl_lib/EPrints/Script/Compiled.pm

@@ -651,7 +651,7 @@ sub run_icon
 		elsif( $optv eq "NewWindow" ) { $args{new_window}=1; }
 		elsif( $optv eq "noNewWindow" ) { $args{new_window}=0; }
 		elsif( $optv eq "previewLeft" ) { $args{preview_side}='left'; }
-		elsif( $optv eq "previewRight" ) { $args{preview_side}='right'; }
+		elsif( $optv eq "LargeIcon" ) { $args{size}='lightbox'; }
 		else { $self->runtime_error( "Unknown option to doc->icon(): $optv" ); }
 	}
 
@@ -931,6 +931,13 @@ sub run_phrase
 	return [ $state->{session}->html_phrase( $phrase->[0] ), "XHTML" ];
 }
 
+sub run_text
+{
+	my( $self, $state, $phrase ) = @_;
+
+	return [ $state->{session}->make_text( $phrase->[0] ), "XHTML" ];
+}
+
 sub run_documents
 {
 	my( $self, $state, $eprint ) = @_;