Update of /cvsroot/fink/fink/perlmod/Fink
In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv23227
Modified Files:
Services.pm
Log Message:
doc-fix ("what's a lol?")
Index: Services.pm
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/Services.pm,v
retrieving revision 1.226
retrieving revision 1.227
diff -u -d -r1.226 -r1.227
--- Services.pm 21 Mar 2009 22:52:34 -0000 1.226
+++ Services.pm 2 Apr 2009 14:49:05 -0000 1.227
@@ -1097,7 +1097,7 @@
Takes a string representing a pkglist field and returns a ref to a
list of lists of strings representing each pkg. The elements of the
list referenced by $struct are joined by logical AND (commas in
-$pkglist). The pkgs in each list referenced by an element of @$srtuct
+$pkglist). The pkgs in each list referenced by an element of @$struct
are joined by logical OR (delimited by vertical-bar within a comma-
delimited cluster). Leading and trailing whitespace are removed from
each pkg, and null pkgs are removed. A ref to an array is always
@@ -1107,6 +1107,17 @@
call, so changing one returned value does not afect the data returned
by another call or the underlying data.
+For example,
+
+ pkglist2lol( 'foo | quux (>= 1.0-1), bar' )
+
+returns
+
+ [
+ [ "foo", "quux (>= 1.0-1)" ],
+ [ "bar" ]
+ ]
+
=cut
sub pkglist2lol {
------------------------------------------------------------------------------
_______________________________________________
Fink-commits mailing list
[email protected]
http://news.gmane.org/gmane.os.apple.fink.cvs
