[Rt-commit] [svn] r818 - in RTx-Atom: . html/Atom/0.3
html/Atom/0.3/Search
autrijus at pallas.eruditorum.org
autrijus at pallas.eruditorum.org
Mon May 3 11:04:01 EDT 2004
Author: autrijus
Date: Mon May 3 11:04:01 2004
New Revision: 818
Modified:
RTx-Atom/ (props changed)
RTx-Atom/html/Atom/0.3/Search/index
RTx-Atom/html/Atom/0.3/dhandler
RTx-Atom/html/Atom/0.3/index
Log:
----------------------------------------------------------------------
r4425 at not: autrijus | 2004-05-03T15:03:33.557558Z
* Do not escape URIs in vain.
----------------------------------------------------------------------
Modified: RTx-Atom/html/Atom/0.3/Search/index
==============================================================================
--- RTx-Atom/html/Atom/0.3/Search/index (original)
+++ RTx-Atom/html/Atom/0.3/Search/index Mon May 3 11:04:01 2004
@@ -29,7 +29,7 @@
<summary mode="escaped"><% $entry->{Description} %></summary>
<issued><% $entry->{Created} %></issued>
<modified><% $entry->{LastUpdated} %></modified>
- <id><% $entry->{URI} |u %></id>
+ <id><% $entry->{URI} %></id>
% if ($entry->{HTML_URI}) {
<& $Link, Type => 'text/html', URI => "$RT::WebURL$entry->{HTML_URI}", Title => $entry->{Name} &>
% }
Modified: RTx-Atom/html/Atom/0.3/dhandler
==============================================================================
--- RTx-Atom/html/Atom/0.3/dhandler (original)
+++ RTx-Atom/html/Atom/0.3/dhandler Mon May 3 11:04:01 2004
@@ -163,7 +163,9 @@
$verb = 'Update' if $verb eq 'Add';
}
-my $map = $m->comp('Elements/Introspect', Want => 'CollectionToClass') if $type;
+my $map;
+$map = $m->comp('Elements/Introspect', Want => 'CollectionToClass') if $type;
+
my $class;
foreach my $key (keys %$map) {
$key =~ /\b\Q$type\E$/ or next;
Modified: RTx-Atom/html/Atom/0.3/index
==============================================================================
--- RTx-Atom/html/Atom/0.3/index (original)
+++ RTx-Atom/html/Atom/0.3/index Mon May 3 11:04:01 2004
@@ -7,7 +7,7 @@
<name><% $RT::Organization %></name>
<url><% $RT::WebURL %></url>
</author>
- <id><% $RT::SystemUser->UserObj->URI |u %></id>
+ <id><% $RT::SystemUser->UserObj->URI %></id>
<& $Link, Type => 'text/html', URI => $RT::WebURL, Title => loc("Homepage") &>
% foreach my $type (@{$m->comp('Elements/Introspect', Want => 'TopLevelCollections')}) {
<& $Link, Relation => 'service.feed', URI => "$BaseURI/$type", Title => loc($type), IsEntry => 1 &>
More information about the Rt-commit
mailing list