diff options
author | Marc Espie <espie@cvs.openbsd.org> | 2008-04-07 12:16:00 +0000 |
---|---|---|
committer | Marc Espie <espie@cvs.openbsd.org> | 2008-04-07 12:16:00 +0000 |
commit | 0d25e30992bdfa0a567676ceb13047335a1c86f0 (patch) | |
tree | 05f1b042b87d23c1d8041fbf1b3e8499b87538b8 /usr.sbin/pkg_add/OpenBSD | |
parent | d54d240cafd9035a5f7a4ff1b28a70ab26c92864 (diff) |
tweak a bit, allow ^ to occur at beginning of variable name
Diffstat (limited to 'usr.sbin/pkg_add/OpenBSD')
-rw-r--r-- | usr.sbin/pkg_add/OpenBSD/Subst.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/Subst.pm b/usr.sbin/pkg_add/OpenBSD/Subst.pm index 665defa5bee..3c91c1ee3c9 100644 --- a/usr.sbin/pkg_add/OpenBSD/Subst.pm +++ b/usr.sbin/pkg_add/OpenBSD/Subst.pm @@ -1,5 +1,5 @@ # ex:ts=8 sw=4: -# $OpenBSD: Subst.pm,v 1.3 2008/04/07 12:02:59 espie Exp $ +# $OpenBSD: Subst.pm,v 1.4 2008/04/07 12:15:59 espie Exp $ # # Copyright (c) 2008 Marc Espie <espie@openbsd.org> # @@ -35,6 +35,7 @@ sub hash sub add { my ($self, $k, $v) = @_; + $k =~ s/^\^//; $self->{$k} = $v; } |