make a few comments easier to read

1 files changed, 7 insertions, 7 deletions

diff --git a/usr.sbin/adduser/adduser.perl b/usr.sbin/adduser/adduser.perl
index b234aaf6218..ef4278e309f 100644
--- a/usr.sbin/adduser/adduser.perl
+++ b/usr.sbin/adduser/adduser.perl
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 #
-#	$OpenBSD: adduser.perl,v 1.59 2014/02/14 19:08:03 tedu Exp $
+#	$OpenBSD: adduser.perl,v 1.60 2014/02/15 06:25:18 tedu Exp $
 #
 # Copyright (c) 1995-1996 Wolfram Schneider <wosch@FreeBSD.org>. Berlin.
 # All rights reserved.
@@ -241,7 +241,7 @@ sub shell_default_valid {
     return $s;
 }
 
-# return default home partition (f.e. "/home")
+# return default home partition (e.g. "/home")
 # create base directory if necessary
 sub home_partition {
     local($home) = @_;
@@ -591,7 +591,7 @@ sub new_users_groups_valid {
     return ($flag, $new_groups);
 }
 
-# your last change
+# your last chance
 sub new_users_ok {
 
     print <<EOF;
@@ -1231,7 +1231,7 @@ sub mkdirhier {
 }
 
 # stript unused '/'
-# F.i.: //usr///home// -> /usr/home
+# e.g.: //usr///home// -> /usr/home
 sub stripdir {
     local($dir) = @_;
 
@@ -1241,8 +1241,8 @@ sub stripdir {
     return '/';
 }
 
-# Read one of the elements from @list. $confirm is default.
-# If !$allow accept only elements from @list.
+# Read one of the elements from @list. $confirm is the default.
+# If !$allow then accept only elements from @list.
 sub confirm_list {
     local($message, $allow, $confirm, @list) = @_;
     local($read, $c, $print);
@@ -1306,7 +1306,7 @@ sub choosetxt_yn_default {
 # YES or NO question
 # return 1 if &confirm("message", "yes") and answer is yes
 #	or if &confirm("message", "no") an answer is no
-# otherwise 0
+# otherwise return 0
 sub confirm_yn {
     local($message, $confirm) = @_;
     local($read, $c);