--- a/mercurial/HGCommitDialog.st	Wed Nov 25 18:55:40 2015 +0100
+++ b/mercurial/HGCommitDialog.st	Sun Feb 07 08:49:11 2016 +0000
@@ -608,13 +608,12 @@
 updateAmendLabel
     | rev cs |
     self task isAmendable ifTrue:[
-        rev := self task packages revision.
-        cs := (self task repository @ rev) .
+        cs := self task temporaryWorkingCopy parent1 .
         self amendLabel value: (resources string: 'Amend %1' with: (cs id printStringWithoutNumber , ' ' , cs summary) asText allBold)
     ].
 
     "Created: / 25-08-2015 / 12:51:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 28-08-2015 / 12:15:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 07-02-2016 / 08:33:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 updateFileList
@@ -660,7 +659,7 @@
 
 updateMessage
     | rev prevMsg |
-    rev := self task packages revision.
+    rev := self task temporaryWorkingCopy parent1Id.
     prevMsg := (self task repository @ rev) message.
     self amendHolder value ifTrue:[
         (self message includesSubstring: prevMsg) ifFalse:[
@@ -674,23 +673,23 @@
     ].
 
     "Created: / 25-08-2015 / 11:58:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 29-08-2015 / 06:30:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 07-02-2016 / 09:00:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !HGCommitDialog methodsFor:'help texts'!
 
 flyByHelpTextForKey:key
     key == #amendLabelHelp ifTrue:[ 
-        | rev cs |
+        | cs |
         self task isAmendable ifTrue:[
-            rev := self task packages revision.
-            cs := (self task repository @ rev) .
+            cs :=  self task temporaryWorkingCopy parent1 .
             ^ cs helpText
         ]
     ]. 
     ^ super flyByHelpTextForKey:key
 
     "Created: / 10-09-2015 / 18:49:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 07-02-2016 / 09:01:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !HGCommitDialog methodsFor:'private'!
@@ -768,6 +767,6 @@
 !
 
 version_SVN
-    ^ '§Id::                                                                                                                        §'
+    ^ 'Id::                                                                                                                        '
 ! !