[Rt-commit] r6206 - in rtir/branches/2.1-EXPERIMENTAL: .

[ruz at bestpractical.com]

Author: ruz
Date: Sat Oct 14 21:53:13 2006
New Revision: 6206

Modified:
   rtir/branches/2.1-EXPERIMENTAL/   (props changed)
   rtir/branches/2.1-EXPERIMENTAL/html/RTIR/Prefs/Home.html

Log:
 r1710 at cubic-pc:  cubic | 2006-10-15 06:01:00 +0400
 * fix adding saved searches to the RTIR's home page


Modified: rtir/branches/2.1-EXPERIMENTAL/html/RTIR/Prefs/Home.html
==============================================================================
--- rtir/branches/2.1-EXPERIMENTAL/html/RTIR/Prefs/Home.html	(original)
+++ rtir/branches/2.1-EXPERIMENTAL/html/RTIR/Prefs/Home.html	Sat Oct 14 21:53:13 2006
@@ -51,7 +51,7 @@
         my $oid = join '-', ref $s->{'Object'},
                             $s->{'Object'}->Id,
                             'SavedSearch',
-                            $s->{'Search'};
+                            $s->{'Search'}->Id;
         push @items, [ "saved-$oid", loc("Saved Search: [_1]", $s->{'Description'}) ];
     }
 }
@@ -68,7 +68,7 @@
             AutoSave  => 1,
             OnSubmit  => sub {
                 my $self = shift;
-                $portlets->{$pane} = [
+                $portlets->{ $pane } = [
                     map { m/(\w+)-(.*)$}/; { type => $1, name => $2, }}
                     @{$self->{Current}}
                 ];