actually have safe do something, stupid typo
authorespie <espie@openbsd.org>
Mon, 26 Feb 2018 14:58:36 +0000 (14:58 +0000)
committerespie <espie@openbsd.org>
Mon, 26 Feb 2018 14:58:36 +0000 (14:58 +0000)
usr.sbin/pkg_add/OpenBSD/State.pm

index c553abd..1895352 100644 (file)
@@ -1,5 +1,5 @@
 # ex:ts=8 sw=4:
-# $OpenBSD: State.pm,v 1.49 2018/02/26 13:04:30 espie Exp $
+# $OpenBSD: State.pm,v 1.50 2018/02/26 14:58:36 espie Exp $
 #
 # Copyright (c) 2007-2014 Marc Espie <espie@openbsd.org>
 #
@@ -179,7 +179,7 @@ sub safe
        my ($self, $string) = @_;
        my @l = split(/\n/, $string);
        s/[[:^print:]]/?/g for @l;
-       return join("\n", $string);
+       return join("\n", @l);
 }
 
 sub f