[vuser] r588 committed - - Fix two bugs....

[codesite...@google.com]

Revision: 588
Author: perlstalker
Date: Wed Dec 16 12:48:28 2009
Log: - Fix two bugs.
1) Wrong sigil on %options in UpdateWebClib()
2) Add missing my $post = ... in UpdateGeneral()

http://code.google.com/p/vuser/source/detail?r=588

Modified:
/VUser-Google-ProvisioningAPI/trunk/lib/VUser/Google/EmailSettings/V2_0.pm

=======================================
---
/VUser-Google-ProvisioningAPI/trunk/lib/VUser/Google/EmailSettings/V2_0.pm
Wed Sep 23 22:30:17 2009
+++
/VUser-Google-ProvisioningAPI/trunk/lib/VUser/Google/EmailSettings/V2_0.pm
Wed Dec 16 12:48:28 2009
@@ -107,7 +107,7 @@

override 'UpdateWebClip' => sub {
my $self = shift;
- my $options = @_;
+ my %options = @_;

my $enable = $options{'enable'};

@@ -325,6 +325,9 @@
foreach my $opt qw(shortcuts arrows snippets unicode) {
$options{$opt} = $options{$opt}? 'true':'false';
}
+
+ my $post = '<?xml version="1.0" encoding="utf-8"?>';
+ $post .= '<atom:entry xmlns:atom="http://www.w3.org/2005/Atom"
xmlns:apps="http://schemas.google.com/apps/2006">';

foreach my $opt (keys %options) {
if (defined $options{$opt}) {