From 30fb7030e56c4f3ec5556756a0515421bcbd423f Mon Sep 17 00:00:00 2001 From: Angel Ortega Date: Tue, 8 Jan 2008 12:30:31 +0100 Subject: [PATCH] New function set, to set a variable to a value. --- Artemus.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/Artemus.pm b/Artemus.pm index 8f988fd..90a5e10 100644 --- a/Artemus.pm +++ b/Artemus.pm @@ -381,6 +381,8 @@ sub new return join($sep, @ret); }; + $a->{funcs}->{set} = sub { $a->{vars}->{$_[0]} = $_[1]; return ''; }; + return $a; } -- 2.11.4.GIT