--- a/extensions.st	Sun Oct 05 00:29:07 2014 +0100
+++ b/extensions.st	Sat Oct 04 23:34:14 2014 +0100
@@ -83,21 +83,14 @@
 !PositionableStream methodsFor:'*petitparser-core-converting'!
 
 asPetitStream
-	"Some of my subclasses do not use the instance-variables collection, position and readLimit but instead have a completely different internal representation. In these cases just use the super implementation that is inefficient but should work in all cases."
-
-	"DUNNO WHY, but on: collection from: position to: last set the start to position -1"
-	self breakPoint: #petitparser.
+        "Some of my subclasses do not use the instance-variables collection, position and readLimit but instead have a completely different internal representation. In these cases just use the super implementation that is inefficient but should work in all cases."
 
-	^ (collection isNil or: [ position  isNil or: [ readLimit isNil ] ])
-		ifFalse: [ PPStream on: collection from: (position +1) to: readLimit ]
-		ifTrue: [ super asPetitStream ]
-
-
-"/        ^ (collection isNil or: [ position isNil or: [ readLimit isNil ] ])
-"/                ifFalse: [ PPStream on: collection from: position to: readLimit ]
-"/                ifTrue: [ super asPetitStream ]
+        ^ (collection isNil or: [ position isNil or: [ readLimit isNil ] ])
+                ifFalse: [ PPStream on: collection from: ( position + 1 ) to: readLimit ]
+                ifTrue: [ super asPetitStream ]
 
     "Modified: / 18-12-2010 / 17:38:01 / Jan Kurs <kurs.jan@post.cz>"
+    "Modified: / 04-10-2014 / 23:27:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !PositionableStream methodsFor:'*petitparser-core'!

--- a/stx_goodies_petitparser.st	Sun Oct 05 00:29:07 2014 +0100
+++ b/stx_goodies_petitparser.st	Sat Oct 04 23:34:14 2014 +0100
@@ -115,15 +115,6 @@
     )
 ! !
 
-!stx_goodies_petitparser class methodsFor:'description - actions'!
-
-postLoadAction
-
-    "/self classes do: [:cls|cls isLoaded ifFalse:[cls autoload]]
-
-    "Created: / 17-12-2010 / 19:55:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
-
 !stx_goodies_petitparser class methodsFor:'description - compilation'!
 
 additionalRules_make_dot_proto
@@ -237,13 +228,6 @@
 
 !stx_goodies_petitparser class methodsFor:'description - project information'!
 
-applicationIconFileName
-    "Return the name (without suffix) of an icon-file (the app's icon); will be included in the rc-resource file"
-
-    ^ nil
-    "/ ^ self applicationName
-!
-
 companyName
     "Return a companyname which will appear in <lib>.rc"
 
@@ -268,13 +252,6 @@
     "Modified: / 17-12-2010 / 19:43:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-productInstallDirBaseName
-    "Returns a default installDir which will appear in <app>.nsi.
-     This is usually not the one you want to keep"
-
-    ^ (self package asCollectionOfSubstringsSeparatedByAny:':/') last
-!
-
 productName
     "Return a product name which will appear in <lib>.rc"