diff --git a/lib/choose_repository.tcl b/lib/choose_repository.tcl
index 5f2d12fd07..9074c1ba5c 100644
--- a/lib/choose_repository.tcl
+++ b/lib/choose_repository.tcl
@@ -496,10 +496,7 @@ method _do_clone2 {} {
 					[file join .git objects $i] \
 					[file join $objdir $i]
 			} err]} {
-			info_popup [strcat \
-				[mc "Hardlinks are unavailable.  Falling back to copying."] \
-				"\n" \
-				$err]
+			info_popup [mc "Hardlinks are unavailable.  Falling back to copying."]
 			set i [_copy_files $this $objdir $tolink]
 		} else {
 			set i [_link_files $this $objdir [lrange $tolink 1 end]]