list.ics.tmpl

bugzilla的安装文件

#------------------------------------------------------------------------
# Compiled template generated by the Template Toolkit version 2.13
#------------------------------------------------------------------------

Template::Document->new({
    METADATA => {
        'modtime' => '1079471922',
        'name' => 'list/list.ics.tmpl',
    },
    BLOCK => sub {
        my $context = shift || die "template sub called without context\n";
        my $stash   = $context->stash;
        my $output  = '';
        my $error;
        
        eval { BLOCK: {
    $output .=  "\n";
    #line 20 "template\en\default\list\list.ics.tmpl"
    $output .=  $context->process('global/variables.none.tmpl');
    $output .=  "\nBEGIN:VCALENDAR\nCALSCALE:GREGORIAN\n";
    #line 23 "template\en\default\list\list.ics.tmpl"
    $output .=  $context->process('ics_prodid');
    $output .=  "\nVERSION:2.0";
    #line 42 "template\en\default\list\list.ics.tmpl"
    
    # FOREACH 
    do {
        my ($value, $error, $oldloop);
        my $list = $stash->get('bugs');
        
        unless (UNIVERSAL::isa($list, 'Template::Iterator')) {
            $list = Template::Config->iterator($list)
                || die $Template::Config::ERROR, "\n"; 
        }
    
        ($value, $error) = $list->get_first();
        eval { $oldloop = $stash->get('loop') };
        $stash->set('loop', $list);
        eval {
    LOOP:   while (! $error) {
                $stash->{'bug'} = $value;
    $output .=  "\nBEGIN:VTODO\n";
    #line 28 "template\en\default\list\list.ics.tmpl"
    $output .=  $context->process('ics_dtstart');
    $output .=  "\n";
    #line 29 "template\en\default\list\list.ics.tmpl"
    $output .=  $context->process('ics_summary');
    $output .=  "\n";
    #line 30 "template\en\default\list\list.ics.tmpl"
    $output .=  $context->process('ics_uid', { 'base_url' => $stash->get(['Param', [ 'urlbase' ]]), 'bug_id' => $stash->get(['bug', 0, 'bug_id', 0]) });
    $output .=  "\n";
    #line 31 "template\en\default\list\list.ics.tmpl"
    $output .=  $context->process('ics_url', { 'base_url' => $stash->get(['Param', [ 'urlbase' ]]), 'bug_id' => $stash->get(['bug', 0, 'bug_id', 0]) });
    $output .=  "\n";
    #line 32 "template\en\default\list\list.ics.tmpl"
    $output .=  $context->process('ics_status', { 'bug_status' => $stash->get(['bug', 0, 'bug_status', 0]) });
    $output .=  "\n";
    #line 33 "template\en\default\list\list.ics.tmpl"
    $output .=  $context->process('ics_dtstamp');
    #line 34 "template\en\default\list\list.ics.tmpl"
    if ($stash->get(['bug', 0, 'changeddate', 0])) {
    $output .=  "\n";
    #line 34 "template\en\default\list\list.ics.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $filter = $context->filter('ics', [ 'LAST-MODIFIED' ])
                  || $context->throw($context->error);
    
    $output .=  $stash->get(['bug', 0, 'changeddate', 0]);
        
        &$filter($output);
    };
    
    }
    
    #line 35 "template\en\default\list\list.ics.tmpl"
    if ($stash->get(['bug', 0, 'percentage_complete', 0])) {
    $output .=  "\n";
    #line 35 "template\en\default\list\list.ics.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $filter = $context->filter('ics', [ 'PERCENT-COMPLETE' ])
                  || $context->throw($context->error);
    
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $filter = $context->filter('format', [ '%d' ])
                  || $context->throw($context->error);
    
    $output .=  $stash->get(['bug', 0, 'percentage_complete', 0]);
        
        &$filter($output);
    };
    
        
        &$filter($output);
    };
    
    }
    
    #line 36 "template\en\default\list\list.ics.tmpl"
    if ($stash->get(['bug', 0, 'product', 0])) {
    $output .=  "\n";
    #line 36 "template\en\default\list\list.ics.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $filter = $context->filter('ics', [ 'X-BUGZILLA-PRODUCT' ])
                  || $context->throw($context->error);
    
    $output .=  $stash->get(['bug', 0, 'product', 0]);
        
        &$filter($output);
    };
    
    }
    
    #line 37 "template\en\default\list\list.ics.tmpl"
    if ($stash->get(['bug', 0, 'component', 0])) {
    $output .=  "\n";
    #line 37 "template\en\default\list\list.ics.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $filter = $context->filter('ics', [ 'X-BUGZILLA-COMPONENT' ])
                  || $context->throw($context->error);
    
    $output .=  $stash->get(['bug', 0, 'component', 0]);
        
        &$filter($output);
    };
    
    }
    
    #line 38 "template\en\default\list\list.ics.tmpl"
    if ($stash->get(['bug', 0, 'version', 0])) {
    $output .=  "\n";
    #line 38 "template\en\default\list\list.ics.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $filter = $context->filter('ics', [ 'X-BUGZILLA-VERSION' ])
                  || $context->throw($context->error);
    
    $output .=  $stash->get(['bug', 0, 'version', 0]);
        
        &$filter($output);
    };
    
    }
    
    #line 39 "template\en\default\list\list.ics.tmpl"
    if ($stash->get(['bug', 0, 'keywords', 0])) {
    $output .=  "\n";
    #line 39 "template\en\default\list\list.ics.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $filter = $context->filter('ics', [ 'X-BUGZILLA-KEYWORDS' ])
                  || $context->throw($context->error);
    
    $output .=  $stash->get(['bug', 0, 'keywords', 0]);
        
        &$filter($output);
    };
    
    }
    
    $output .=  "\nEND:VTODO";;
                ($value, $error) = $list->get_next();
            }
        };
        $stash->set('loop', $oldloop);
        die $@ if $@;
        $error = 0 if $error && $error eq Template::Constants::STATUS_DONE;
        die $error if $error;
    };
    
    $output .=  "\nEND:VCALENDAR\n";
    
    $output .=  "\n";
    
    $output .=  "\n";
    
    $output .=  "\n";
    
    $output .=  "\n";
    
    $output .=  "\n";
    
    $output .=  "\n";
    
    $output .=  "\n";
        } };
        if ($@) {
            $error = $context->catch($@, \$output);
            die $error unless $error->type eq 'return';
        }
    
        return $output;
    },
    DEFBLOCKS => {
        'ics_status' => sub {
            my $context = shift || die "template sub called without context\n";
            my $stash   = $context->stash;
            my $output  = '';
            my $error;
            
            eval { BLOCK: {
        #line 61 "template\en\default\list\list.ics.tmpl"
        $stash->set('status', '');
        
        #line 61 "template\en\default\list\list.ics.tmpl"
        
        # FOREACH 
        do {
            my ($value, $error, $oldloop);
            my $list = $stash->get('closedstates');
            
            unless (UNIVERSAL::isa($list, 'Template::Iterator')) {
                $list = Template::Config->iterator($list)
                    || die $Template::Config::ERROR, "\n"; 
            }
        
            ($value, $error) = $list->get_first();
            eval { $oldloop = $stash->get('loop') };
            $stash->set('loop', $list);
            eval {
        LOOP:   while (! $error) {
                    $stash->{'state'} = $value;
        #line 61 "template\en\default\list\list.ics.tmpl"
        if ($stash->get('bug_status') eq $stash->get('state')) {
        #line 61 "template\en\default\list\list.ics.tmpl"
        $stash->set('status', 'COMPLETED');
        
        #line 61 "template\en\default\list\list.ics.tmpl"
        last LOOP;
        }
        ;
                    ($value, $error) = $list->get_next();
                }
            };
            $stash->set('loop', $oldloop);