diff -r e1b11f74e142 -r 90de244a7fa2 PPLiteralObjectParser.st --- a/PPLiteralObjectParser.st Mon Sep 12 19:48:53 2011 +0200 +++ b/PPLiteralObjectParser.st Fri Jan 13 12:22:50 2012 +0100 @@ -1,4 +1,4 @@ -"{ Package: 'squeak:petitparser' }" +"{ Package: 'stx:goodies/petitparser' }" PPLiteralParser subclass:#PPLiteralObjectParser instanceVariableNames:'' @@ -15,7 +15,7 @@ caseInsensitive "Answer a parser that can parse the receiver case-insensitive." - + literal asUppercase = literal asLowercase ifTrue: [ ^ self ]. ^ PPPredicateObjectParser on: [ :value | literal sameAs: value ] message: message ! ! @@ -31,5 +31,5 @@ !PPLiteralObjectParser class methodsFor:'documentation'! version_SVN - ^ '$Id: PPLiteralObjectParser.st,v 1.1 2011-08-18 18:56:17 cg Exp $' + ^ '$Id: PPLiteralObjectParser.st,v 1.2 2012-01-13 11:22:50 cg Exp $' ! !