Contents of /trunk/share/web/templates/feed

<%args>
$type => 'RSS'
</%args>
<%init>
use XML::Feed;
my $queries = SQLSession::Model::QueryCollection->new();
$queries->unlimit();

my $feed = XML::Feed->new( $type );
$feed->title( Jifty->config->framework('ApplicationName') . " Feed" );
$feed->link( Jifty->web->url );
$feed->description( $feed->title );

while( my $q = $queries->next ) {
        my $feed_entry = XML::Feed::Entry->new($type);
        $feed_entry->title( $q->name . ' (' . $q->on_database->name . ')' );
        $feed_entry->author( $q->owner->name );
        $feed_entry->link( Jifty->web->url . "sql/" . $q->id );
        $feed_entry->issued( $q->created_on );
        #my $note .= "\n (database: " . $q->on_database->name . ")\n\n";
        $feed_entry->summary( $q->note .'<pre>' . $q->sql_query . '</pre>' );
        $feed->add_entry( $feed_entry );
}
</%init>
<% $feed->as_xml |n %>
1	<%args>
2	$type => 'RSS'
3	</%args>
4	<%init>
5	use XML::Feed;
6	my $queries = SQLSession::Model::QueryCollection->new();
7	$queries->unlimit();
8
9	my $feed = XML::Feed->new( $type );
10	$feed->title( Jifty->config->framework('ApplicationName') . " Feed" );
11	$feed->link( Jifty->web->url );
12	$feed->description( $feed->title );
13
14	while( my $q = $queries->next ) {
15	my $feed_entry = XML::Feed::Entry->new($type);
16	$feed_entry->title( $q->name . ' (' . $q->on_database->name . ')' );
17	$feed_entry->author( $q->owner->name );
18	$feed_entry->link( Jifty->web->url . "sql/" . $q->id );
19	$feed_entry->issued( $q->created_on );
20	#my $note .= "\n (database: " . $q->on_database->name . ")\n\n";
21	$feed_entry->summary( $q->note .'<pre>' . $q->sql_query . '</pre>' );
22	$feed->add_entry( $feed_entry );
23	}
24	</%init>
25	<% $feed->as_xml \|n %>