[perl-Gtk3] Hush a warning from Gtk3::ActionGroup::add_toggle_actions

[Torsten SchÃnfeld <tsch src gnome org>]

commit 17caa61cbc7b46ee468ebb99ab1c60d52f66c7ab
Author: Torsten SchÃnfeld <kaffeetisch gmx de>
Date:   Sat Feb 9 23:04:48 2013 +0100

    Hush a warning from Gtk3::ActionGroup::add_toggle_actions

 lib/Gtk3.pm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)
---
diff --git a/lib/Gtk3.pm b/lib/Gtk3.pm
index 841f99a..4c91cfc 100644
--- a/lib/Gtk3.pm
+++ b/lib/Gtk3.pm
@@ -423,7 +423,7 @@ sub Gtk3::ActionGroup::add_toggle_actions {
 
     my $action = Gtk3::ToggleAction->new (
       $name, $label, $tooltip, $stock_id);
-    $action->set_active ($is_active);
+    $action->set_active ($is_active) if defined $is_active;
 
     if ($callback) {
       $action->signal_connect ('activate', $callback, $user_data);