This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
formatting nit
authorH.Merijn Brand <h.m.brand@xs4all.nl>
Mon, 19 Jan 2009 15:47:18 +0000 (16:47 +0100)
committerH.Merijn Brand <h.m.brand@xs4all.nl>
Mon, 19 Jan 2009 15:47:18 +0000 (16:47 +0100)
U/modified/d_dosuid.U

index 1d82180..878e320 100644 (file)
@@ -140,7 +140,7 @@ val="$undef"
 case "$d_suidsafe" in
 "$define")
        val="$undef"
-       echo "No need to emulate SUID scripts since they are secure here." >& 4
+       echo "No need to emulate SUID scripts since they are secure here." >&4
        ;;
 *)
        $cat <<EOM