Why does this work:
tell application "iCal"
tell last calendar
make new event at end with properties {summary:"foo"}
end tell
end tell
But not this:
use Mac::Glue qw(:glue);
my $ical = new Mac::Glue "iCal";
my $calendar = $ical->obj(calendar => gLast);
print $calendar->prop("title")->get, "\n\n";
$calendar->make(
new => 'event',
at => location('end'),
with_properties => { summary => "foo" }
);
