--- a/mercurial/HGRepository.st	Fri Nov 23 23:13:22 2012 +0000
+++ b/mercurial/HGRepository.st	Tue Nov 27 18:02:09 2012 +0000
@@ -254,7 +254,7 @@
 changesetWithId: idobj
     | id xid cs |
 
-    id := idobj asHGNodeId.    
+    id := idobj asHGChangesetId.    
     "/Try to translate it...
     id hasRevnoOnly ifTrue:[
         xid := revno2nodeIdMap at: id revno ifAbsent:[nil].