[perl-xml-cvs] CVS: XML-LibXML-XPathContext XPathContext.pm,1.22,1.23

[Ilya M. <m_...@us...>]

Update of /cvsroot/perl-xml/XML-LibXML-XPathContext
In directory sc8-pr-cvs1:/tmp/cvs-serv32576

Modified Files:
	XPathContext.pm 
Log Message:
Minor style fixes - be consistent in usage of space chars

Index: XPathContext.pm
===================================================================
RCS file: /cvsroot/perl-xml/XML-LibXML-XPathContext/XPathContext.pm,v
retrieving revision 1.22
retrieving revision 1.23
diff -u -d -r1.22 -r1.23
--- XPathContext.pm	30 Apr 2003 20:27:28 -0000	1.22
+++ XPathContext.pm	30 Apr 2003 20:31:46 -0000	1.23
@@ -162,13 +162,13 @@
     $xc->unregisterVarLookupFunc($name);
 
     my @nodes = $xc->findnodes($xpath);
-    my @nodes = $xc->findnodes($xpath,$context_node);
+    my @nodes = $xc->findnodes($xpath, $context_node);
     my $nodelist = $xc->findnodes($xpath);
-    my $nodelist = $xc->findnodes($xpath,$context_node);
+    my $nodelist = $xc->findnodes($xpath, $context_node);
     my $result = $xc->find($xpath);
-    my $result = $xc->find($xpath,$context_node);
+    my $result = $xc->find($xpath, $context_node);
     my $value = $xc->findvalue($xpath);
-    my $value = $xc->findvalue($xpath,$context_node);
+    my $value = $xc->findvalue($xpath, $context_node);
 
 =head1 DESCRIPTION
 
@@ -249,7 +249,7 @@
       );
 
     # get names of employees from $A woring in an area listed in $B
-    $xc->registerVarLookupFunc(\&var_lookup,\%results);
+    $xc->registerVarLookupFunc(\&var_lookup, \%results);
     my @nodes = $xc->findnodes('$A[work_area/street = $B]/name');
 
 =head1 METHODS
@@ -343,7 +343,6 @@
 of those objects uses Perl's overload feature to "do the right thing"
 in different contexts. Optionally, a node may be passed as a second
 argument to set the context node for the query.
-
 
 
 =item B<findvalue($xpath, [ $context_node ])>