--- a/mercurial/HGTests.st	Thu Jul 17 20:09:49 2014 +0000
+++ b/mercurial/HGTests.st	Thu Jul 17 21:40:06 2014 +0000
@@ -1042,11 +1042,11 @@
         self should: [ HGCommand new executable ] raise: HGCommandError.
 
         HGCommand hgCommand: nil.
-        UserPreferences current hgCommand: Filename newTemporary.
+        UserPreferences current hgCommand: Filename newTemporary pathName.
         self should: [ HGCommand new executable ] raise: HGCommandError.
 
         HGCommand hgCommand: nil.
-        UserPreferences current hgCommand: Filename newTemporaryDirectory.
+        UserPreferences current hgCommand: Filename newTemporaryDirectory pathName.
         self should: [ HGCommand new executable ] raise: HGCommandError.
 
         OperatingSystem isUNIXlike ifTrue:[