Changeset 24483 for gs3-extensions/solr/trunk/src/perllib/solrutil.pm

Timestamp:

2011-08-26T00:22:29+12:00 (13 years ago)

Author:

davidb

Message:

Reworking of code that detects existing running instance of Solr/Jetty server. This was due to Windows version of Perl not implementing '' on an open call. Code currently messy and needs a further tidy up.

File:

• gs3-extensions/solr/trunk/src/perllib/solrutil.pm (modified) (2 diffs)

gs3-extensions/solr/trunk/src/perllib/solrutil.pm

@@ -63 +63 @@
 sub open_post_pipe
 {
-    my ($collect,$doc_tag_level) = @_;
+    my ($collect,$ds_idx) = @_;
 
     my $search_path = get_search_path();
@@ -75 +75 @@
     
     # Now run solr-post command
-    my $core = $collect."-".lc($doc_tag_level);
+    my $core = $collect."-".$ds_idx;
     my $post_props = "-Durl=http://localhost:$jetty_port/solr/$core/update";
     $post_props .= " -Ddata=stdin";