[MOBY-guts] biomoby commit

[Martin Senger]

senger
Sat Oct 14 16:46:33 EDT 2006
Update of /home/repository/moby/moby-live/Java/src/Perl/samples/Service
In directory dev.open-bio.org:/tmp/cvs-serv21894/samples/Service

Modified Files:
	Mabuhay.pm 
Log Message:

moby-live/Java/src/Perl/samples/Service Mabuhay.pm,1.1,1.2
===================================================================
RCS file: /home/repository/moby/moby-live/Java/src/Perl/samples/Service/Mabuhay.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- /home/repository/moby/moby-live/Java/src/Perl/samples/Service/Mabuhay.pm	2006/10/14 18:38:36	1.1
+++ /home/repository/moby/moby-live/Java/src/Perl/samples/Service/Mabuhay.pm	2006/10/14 20:46:33	1.2
@@ -51,6 +51,7 @@
 sub process_it {
     my ($self, $request, $response, $context) = @_;
 
+
     # read (some) input data
     # (use eval to protect against missing data)
     my $language = eval { $request->language };
@@ -81,7 +82,7 @@
     foreach my $idx (0 .. $#result_hellos) {
 	$response->add_hello (new MOSES::MOBY::Data::simple_key_value_pair
 			      ( key   => $self->as_uni_string ($result_langs[$idx]),
-				value => $self->as_uni_string ($result_hellos[$idx])
+				value => $self->as_uni_string ($result_hellos[$idx]),
 				));
     }