Mercurial > make_username
changeset 6:065d2beb69a5
Added lines between functions for readbility.
author | Eris Caffee <discordia@eldalin.com> |
---|---|
date | Mon, 18 Jul 2011 10:15:15 -0500 |
parents | 0979af167267 |
children | 462ba4c70c65 |
files | make-username.pl |
diffstat | 1 files changed, 2 insertions(+), 0 deletions(-) [+] |
line diff
1.1 --- a/make-username.pl Mon Jul 18 09:37:20 2011 -0500 1.2 +++ b/make-username.pl Mon Jul 18 10:15:15 2011 -0500 1.3 @@ -134,6 +134,7 @@ 1.4 defined $user and printf("%30s %-".$maxlen."s in %ds\n", $base, $user, $t2 - $t1); 1.5 } 1.6 1.7 +################################################################################ 1.8 sub make_username { 1.9 # Arguments: 1.10 # The string to use as the basis of the new username. 1.11 @@ -192,6 +193,7 @@ 1.12 return $newuser; 1.13 } 1.14 1.15 +################################################################################ 1.16 sub user_exists { 1.17 my ($user, $pwdfile) = @_; 1.18