Allow lookup of users with spaces in their name.

[ira/wip.git] / testsuite / nsswitch / finger.exp

diff --git a/testsuite/nsswitch/finger.exp b/testsuite/nsswitch/finger.exp
index ab3b28f58fc46395d0208895ad995dd1883f380b..36bab8e19901f12b3bc946de91dad935510245d8 100644 (file)
--- a/testsuite/nsswitch/finger.exp
+++ b/testsuite/nsswitch/finger.exp
@@ -12,10 +12,10 @@ if { [regexp "Error" $output] } {
 
 set user_list [split $output "\n"]
 
-# Look up all users using finger.  This should test getpwnam()
+# Look up all users using finger -m.  This should test getpwnam()
 
 foreach { user } $user_list {
-    set output [util_start "finger" "-m $user" "" "no such user"]
+    set output [util_start "finger" "-m \"$user\"" "" "no such user"]
     verbose $output
 
     if { [regexp "no such user" $output] } {
@@ -25,12 +25,10 @@ foreach { user } $user_list {
     }
 }
 
-verbose "testing finger -m"
-
 # Run finger without the -m to also test set/get/endpwent()
 
 foreach { user } $user_list {
-    set output [util_start "finger" "-m $user"]
+    set output [util_start "finger" "\"$user\""]
     verbose $output
     
     if { [regexp "no such user" $output] } {