--- a/mercurial/HGInstaller.st	Wed Aug 21 09:33:11 2013 +0100
+++ b/mercurial/HGInstaller.st	Thu Sep 05 12:40:01 2013 +0100
@@ -419,7 +419,7 @@
 doExtract
     | zar |
 
-    Transcript nextPutAll:'Extracting...'; cr.
+    Transcript nextPutLine:'Extracting...'.
     [
         destination recursiveMakeDirectory.
     ] on:Error
@@ -439,7 +439,9 @@
             src := src copyFrom:i + 1.
         ].
         
-        skipIt := src startsWith:'git'.
+        skipIt := (src startsWith:'git') 
+                        or:[src startsWith: 'mercurial/docs'].
+
         skipIt ifFalse:[
            dst := OperatingSystem isMSWINDOWSlike 
                    ifTrue:[destination / (src copyReplaceAll:$/ with:Filename separator)]
@@ -448,14 +450,15 @@
                dstd recursiveMakeDirectory
            ].
            dst writingFileDo:[:f | 
-               Transcript nextPutAll: '  '; nextPutAll: src; cr.
+               Transcript nextPutAll: '  '; nextPutLine: src.
                zar extract:zmemb fileName intoStream:f 
            ].
         ].
     ].
 
     "Created: / 07-07-2013 / 11:19:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 01-08-2013 / 14:41:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 07-07-2013 / 19:22:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified (format): / 07-07-2013 / 20:51:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 doPrepare
@@ -577,12 +580,5 @@
     "Modified: / 11-07-2013 / 01:45:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-!HGInstaller class methodsFor:'documentation'!
-
-version_HG
-
-    ^ '$Changeset: <not expanded> $'
-! !
-
 
 HGInstaller initialize!