--- a/mercurial/HGCommand.st	Tue Jan 29 16:31:57 2013 +0000
+++ b/mercurial/HGCommand.st	Tue Jan 29 16:33:48 2013 +0000
@@ -1174,8 +1174,8 @@
     ^ url
 !
 
-url:something
-    url := something.
+url:remote
+    url := remote.
 ! !
 
 !HGCommand::push methodsFor:'private'!
@@ -1183,15 +1183,15 @@
 argumentsCommandOn:stream
     "Called to get command specific options"
 
-    url notNil ifTrue:[
-        stream nextPut: url.
-    ].
+
+    stream nextPut: (url ? 'default').
+
     force == true ifTrue:[
         stream nextPut:'--force'
     ]
 
     "Created: / 30-09-2012 / 23:44:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 27-11-2012 / 21:55:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 29-01-2013 / 15:42:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 parse:stream