[prev in list] [next in list] [prev in thread] [next in thread] 

List:       bricolage-commits
Subject:    [Bricolage-Commits] Replaced Bric::App::ReqCache with pnotes
From:       Scott Lanning <slanning () users ! sourceforge ! net>
Date:       2002-11-30 6:23:39
[Download RAW message or body]

Log Message:
-----------
Replaced Bric::App::ReqCache with pnotes

Modified Files:
--------------
    /cvsroot/bricolage/bricolage/lib/Bric:
        ToDo.pod
    /cvsroot/bricolage/bricolage/comp/lib/util:
        status_msg.mc
    /cvsroot/bricolage/bricolage/lib/Bric/App:
        Authz.pm
        CleanupHandler.pm
        Handler.pm
    /cvsroot/bricolage/bricolage/comp/workflow/profile/media:
        contributor_role.html
        contributors.html
        dhandler
        edit_notes.html
        view_notes.html
    /cvsroot/bricolage/bricolage/comp/workflow/profile/story:
        contributor_role.html
        contributors.html
        dhandler
        edit_notes.html
        keywords.html
        view_notes.html
    /cvsroot/bricolage/bricolage/comp/workflow/profile/templates:
        dhandler
        edit_notes.html
        view_notes.html
    /cvsroot/bricolage/bricolage/comp/widgets/asset_meta:
        asset_meta.mc
    /cvsroot/bricolage/bricolage/comp/widgets/debug:
        debug.mc
    /cvsroot/bricolage/bricolage/comp/widgets/desk:
        desk.mc
        desk_bottom.html
        desk_item.html
    /cvsroot/bricolage/bricolage/comp/widgets/media_prof:
        media_prof.mc
    /cvsroot/bricolage/bricolage/comp/widgets/story_prof:
        story_prof.mc
    /cvsroot/bricolage/bricolage/comp/widgets/tmpl_prof:
        tmpl_prof.mc
["slanning-2002113062339-diff.txt" (slanning-2002113062339-diff.txt)]

Index: ToDo.pod
===================================================================
RCS file: /cvsroot/bricolage/bricolage/lib/Bric/ToDo.pod,v
retrieving revision 1.76
retrieving revision 1.77
diff -u -w -d -r1.76 -r1.77
--- ToDo.pod	27 Nov 2002 04:58:57 -0000	1.76
+++ ToDo.pod	30 Nov 2002 06:23:36 -0000	1.77
@@ -236,10 +236,6 @@
 
 =item *
 
-Dump Bric::App::ReqCache. Use C<< $r->pnotes() >> instead.
-
-=item *
-
 Add preference for Contributors to be automatically added to assets as keywords.
 
 =item *
Index: status_msg.mc
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/lib/util/status_msg.mc,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -w -d -r1.5 -r1.6
--- status_msg.mc	4 Dec 2001 18:17:39 -0000	1.5
+++ status_msg.mc	30 Nov 2002 06:23:36 -0000	1.6
@@ -4,7 +4,7 @@
 </%once>
 <%init>;
 local $m->interp->{out_mode} = 'stream';
-unless ( $rc->get($key) ) {
+unless ( $r->pnotes($key) ) {
     # We haven't called this thing yet. Throw up some initial information.
     $m->out("<br />\n" x 2);
 #    $m->out(qq{
@@ -17,7 +17,7 @@
 }
 map $m->out(qq{$space<span class="errorMsg">$_</span><br />\n}), @_;
 $m->flush_buffer;
-$rc->set($key, 1);
+$r->pnotes($key, 1);
 </%init>
 <%doc>
 
Index: Authz.pm
===================================================================
RCS file: /cvsroot/bricolage/bricolage/lib/Bric/App/Authz.pm,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -w -d -r1.8 -r1.9
--- Authz.pm	20 May 2002 03:22:00 -0000	1.8
+++ Authz.pm	30 Nov 2002 06:23:36 -0000	1.9
@@ -50,7 +50,6 @@
 # Programmatic Dependences
 use Bric::Util::Priv::Parts::Const qw(:all);
 use Bric::App::Session qw(:user user_is_admin);
-use Bric::App::ReqCache;
 
 ################################################################################
 # Inheritance
@@ -77,7 +76,6 @@
 
 ################################################################################
 # Private Class Fields
-my $rc;
 
 ################################################################################
 
@@ -148,13 +146,13 @@
     my ($obj, $chk_perm, $no_redir, @gids) = @_;
     my $perm;
     if (my $ref = ref $obj) {
-	$rc ||= Bric::App::ReqCache->new;
 	my $id = $obj->get_id;
 	$id = '' unless defined $id;
 	my $key = "_AUTHZ_:$ref:$id";
-	unless (defined ($perm = $rc->get($key))) {
+        my $r = $HTML::Mason::Commands::r;
+        unless (defined ($perm = $r->pnotes($key))) {
 	    $perm = get_user_object()->what_can($obj, @gids);
-	    $rc->set($key, $perm);
+            $r->pnotes($key, $perm);
 	}
     } else {
 	$perm = get_user_object()->what_can($obj, @gids);
Index: CleanupHandler.pm
===================================================================
RCS file: /cvsroot/bricolage/bricolage/lib/Bric/App/CleanupHandler.pm,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -w -d -r1.9 -r1.10
--- CleanupHandler.pm	30 Aug 2002 22:13:38 -0000	1.9
+++ CleanupHandler.pm	30 Nov 2002 06:23:36 -0000	1.10
@@ -56,7 +56,6 @@
 # Programmatic Dependences
 use Apache::Constants qw(OK);
 use Bric::App::Session;
-use Bric::App::ReqCache;
 use Bric::App::Event qw(commit_events);
 use Bric::Util::DBI qw(:trans);
 
@@ -137,7 +136,6 @@
     eval {
 	# Sync the user's session data.
 	Bric::App::Session::sync_user_session($r);
-	Bric::App::ReqCache->clear;
     };
     # If there's a problem with this (unlikely!), then we're hosed. Apache will
     # hang and need to be rebooted.
Index: Handler.pm
===================================================================
RCS file: /cvsroot/bricolage/bricolage/lib/Bric/App/Handler.pm,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -w -d -r1.21 -r1.22
--- Handler.pm	13 Nov 2002 22:58:52 -0000	1.21
+++ Handler.pm	30 Nov 2002 06:23:36 -0000	1.22
@@ -96,7 +96,6 @@
     use Bric::App::Auth qw(:all);
     use Bric::App::Authz qw(:all);
     use Bric::App::Cache;
-    use Bric::App::ReqCache;
     use Bric::App::Event qw(log_event);
     use Bric::App::Session qw(:state :user);
     use Bric::App::Util qw(:msg
@@ -122,16 +121,13 @@
 
     use Bric::SOAP;
 
-    use vars qw($c $rc $widget_dir);
+    use vars qw($c $widget_dir);
 
     # Where our widgets live under the element root.
     $widget_dir = 'widgets';
 
     # A global that makes the cache available everywhere.
     $c = Bric::App::Cache->new;
-
-    # A global that maes the request cache available everywhere.
-    $rc = Bric::App::ReqCache->new;
 }
 
 ################################################################################
Index: contributor_role.html
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/workflow/profile/media/contributor_role.html,v
 retrieving revision 1.6
retrieving revision 1.7
diff -u -w -d -r1.6 -r1.7
--- contributor_role.html	26 Feb 2002 03:38:44 -0000	1.6
+++ contributor_role.html	30 Nov 2002 06:23:36 -0000	1.7
@@ -47,7 +47,7 @@
 
 <& /widgets/wrappers/sharky/header.mc,
 	title => 'Contributor Role',
-	context => $context . $rc->get('media_prof|title') . ' | Contributor | Role'
+	context => $context . $r->pnotes('media_prof|title') . ' | Contributor | Role'
 &>
 <% $content %>
 <& /widgets/wrappers/sharky/footer.mc &>
Index: contributors.html
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/workflow/profile/media/contributors.html,v
 retrieving revision 1.6
retrieving revision 1.7
diff -u -w -d -r1.6 -r1.7
--- contributors.html	26 Feb 2002 03:38:44 -0000	1.6
+++ contributors.html	30 Nov 2002 06:23:36 -0000	1.7
@@ -47,7 +47,7 @@
 
 <& /widgets/wrappers/sharky/header.mc,
 	title => 'Contributor Association',
-	context => $context . $rc->get('media_prof|title') . ' | Contributors'
+	context => $context . $r->pnotes('media_prof|title') . ' | Contributors'
 &>
 
 <form action="<% $r->uri %>" method="post" name="theForm">
Index: dhandler
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/workflow/profile/media/dhandler,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -w -d -r1.6 -r1.7
--- dhandler	23 Oct 2002 01:19:12 -0000	1.6
+++ dhandler	30 Nov 2002 06:23:36 -0000	1.7
@@ -54,7 +54,7 @@
 
 <& "/widgets/wrappers/sharky/header.mc",
     title => "$disp Profile",
-    context => "Workflow | Profile | $disp | " . $rc->get('media_prof|title')
+    context => "Workflow | Profile | $disp | " . $r->pnotes('media_prof|title')
 &>
 
 <form method="post" action="<% $r->uri %>" enctype="multipart/form-data" \
                name="theForm" onSubmit="return confirmChanges(this)">
Index: edit_notes.html
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/workflow/profile/media/edit_notes.html,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -u -w -d -r1.1.1.1 -r1.2
--- edit_notes.html	6 Sep 2001 21:52:38 -0000	1.1.1.1
+++ edit_notes.html	30 Nov 2002 06:23:36 -0000	1.2
@@ -24,7 +24,7 @@
 
 <& "/widgets/wrappers/sharky/header.mc",
   	title => "Edit Notes",
-	context => $context . $rc->get("asset_meta|name") . ' | Notes'
+	context => $context . $r->pnotes("asset_meta|name") . ' | Notes'
  &>
 
 <form>
Index: view_notes.html
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/workflow/profile/media/view_notes.html,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -u -w -d -r1.1.1.1 -r1.2
--- view_notes.html	6 Sep 2001 21:52:38 -0000	1.1.1.1
+++ view_notes.html	30 Nov 2002 06:23:36 -0000	1.2
@@ -24,7 +24,7 @@
 
 <& "/widgets/wrappers/sharky/header.mc",
   title => "Notes",
-	context => $context . $rc->get("asset_meta|name") . ' | Notes'
+	context => $context . $r->pnotes("asset_meta|name") . ' | Notes'
 &>
 
 <form action="<% $r->uri %>" method="post">
Index: contributor_role.html
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/workflow/profile/story/contributor_role.html,v
 retrieving revision 1.6
retrieving revision 1.7
diff -u -w -d -r1.6 -r1.7
--- contributor_role.html	26 Feb 2002 03:38:45 -0000	1.6
+++ contributor_role.html	30 Nov 2002 06:23:36 -0000	1.7
@@ -47,7 +47,7 @@
 
 <& /widgets/wrappers/sharky/header.mc,
 	title => 'Contributor Role',
-	context => $context . $rc->get('story_prof|title') . ' | Contributor | Role'
+	context => $context . $r->pnotes('story_prof|title') . ' | Contributor | Role'
 &>
 <% $content %>
 <& /widgets/wrappers/sharky/footer.mc &>
Index: contributors.html
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/workflow/profile/story/contributors.html,v
 retrieving revision 1.6
retrieving revision 1.7
diff -u -w -d -r1.6 -r1.7
--- contributors.html	26 Feb 2002 03:38:45 -0000	1.6
+++ contributors.html	30 Nov 2002 06:23:36 -0000	1.7
@@ -47,7 +47,7 @@
 
 <& /widgets/wrappers/sharky/header.mc, 
 	title => 'Contributor Association',
-	context => $context . $rc->get('story_prof|title') . ' | Contributors'
+	context => $context . $r->pnotes('story_prof|title') . ' | Contributors'
 &>
 
 <form action="<% $r->uri %>" method="post" name="theForm">
Index: dhandler
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/workflow/profile/story/dhandler,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -w -d -r1.6 -r1.7
--- dhandler	23 Oct 2002 01:19:13 -0000	1.6
+++ dhandler	30 Nov 2002 06:23:36 -0000	1.7
@@ -52,7 +52,7 @@
 # Output the Header.
 $m->comp("/widgets/wrappers/sharky/header.mc",
 	 title => "$disp Profile",
-	 context => "Workflow | Profile | $disp | " . $rc->get('story_prof|title'));
+	 context => "Workflow | Profile | $disp | " . $r->pnotes('story_prof|title'));
 
 </%init>
 %# Output the content.
Index: edit_notes.html
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/workflow/profile/story/edit_notes.html,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -u -w -d -r1.1.1.1 -r1.2
--- edit_notes.html	6 Sep 2001 21:52:39 -0000	1.1.1.1
+++ edit_notes.html	30 Nov 2002 06:23:36 -0000	1.2
@@ -24,7 +24,7 @@
 
 <& "/widgets/wrappers/sharky/header.mc",
   	title => "Edit Notes",
-	context => $context . $rc->get("asset_meta|name") . ' | Notes'
+	context => $context . $r->pnotes("asset_meta|name") . ' | Notes'
 &>
 
 <form action="<% $r->uri %>" method="post">
Index: keywords.html
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/workflow/profile/story/keywords.html,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -w -d -r1.5 -r1.6
--- keywords.html	4 Dec 2001 18:17:42 -0000	1.5
+++ keywords.html	30 Nov 2002 06:23:36 -0000	1.6
@@ -47,7 +47,7 @@
 
 <& /widgets/wrappers/sharky/header.mc, 
 	title => 'Edit Keywords',
-	context => $context . $rc->get('story_prof|title') . ' | Keywords'
+	context => $context . $r->pnotes('story_prof|title') . ' | Keywords'
 &>
 <form action="<% $r->uri %>" method="post" name="theForm">
 <% $content %>
Index: view_notes.html
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/workflow/profile/story/view_notes.html,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -u -w -d -r1.1.1.1 -r1.2
--- view_notes.html	6 Sep 2001 21:52:40 -0000	1.1.1.1
+++ view_notes.html	30 Nov 2002 06:23:36 -0000	1.2
@@ -24,7 +24,7 @@
 
 <& "/widgets/wrappers/sharky/header.mc",
   	title => "Notes",
-	context => $context . $rc->get("asset_meta|name") . ' | Notes'
+	context => $context . $r->pnotes("asset_meta|name") . ' | Notes'
 &>
 
 <form action="<% $r->uri %>" method="post">
Index: dhandler
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/workflow/profile/templates/dhandler,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -w -d -r1.6 -r1.7
--- dhandler	23 Oct 2002 01:19:13 -0000	1.6
+++ dhandler	30 Nov 2002 06:23:36 -0000	1.7
@@ -52,7 +52,7 @@
 # Output the Header.
 $m->comp("/widgets/wrappers/sharky/header.mc",
 	 title => "$disp Profile",
-	 context => "Workflow | Profile | $disp | " . $rc->get('tmpl_prof|name'));
+	 context => "Workflow | Profile | $disp | " . $r->pnotes('tmpl_prof|name'));
 </%init>
 <form method="post" action="<% $r->uri %>" name="theForm" onSubmit="return \
confirmChanges(this)">  <% $content %>
Index: edit_notes.html
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/workflow/profile/templates/edit_notes.html,v
 retrieving revision 1.1.1.1
retrieving revision 1.2
diff -u -w -d -r1.1.1.1 -r1.2
--- edit_notes.html	6 Sep 2001 21:52:40 -0000	1.1.1.1
+++ edit_notes.html	30 Nov 2002 06:23:36 -0000	1.2
@@ -24,7 +24,7 @@
 
 <& '/widgets/wrappers/sharky/header.mc', 
 	'title' => 'Notes',
-	context => $context . $rc->get("asset_meta|name") . ' | Notes'
+	context => $context . $r->pnotes("asset_meta|name") . ' | Notes'
 &>
 
 <form action="<% $r->uri %>" method="post">
Index: view_notes.html
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/workflow/profile/templates/view_notes.html,v
 retrieving revision 1.1.1.1
retrieving revision 1.2
diff -u -w -d -r1.1.1.1 -r1.2
--- view_notes.html	6 Sep 2001 21:52:41 -0000	1.1.1.1
+++ view_notes.html	30 Nov 2002 06:23:36 -0000	1.2
@@ -24,7 +24,7 @@
 
 <& "/widgets/wrappers/sharky/header.mc",
   	title => "Notes",
-	context => $context . $rc->get("asset_meta|name") . ' | Notes'
+	context => $context . $r->pnotes("asset_meta|name") . ' | Notes'
 &>
 
 <form action="<% $r->uri %>" method="post">
Index: asset_meta.mc
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/widgets/asset_meta/asset_meta.mc,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -w -d -r1.2 -r1.3
--- asset_meta.mc	4 Dec 2001 18:17:39 -0000	1.2
+++ asset_meta.mc	30 Nov 2002 06:23:36 -0000	1.3
@@ -56,7 +56,7 @@
     set_state_data($widget, 'obj', $object);
     set_state_data($widget, 'notes', $notes);
     set_state_data($widget, 'version', $version);
-    $rc->set("$widget|name", '&quot;' . $object->get_name . '&quot;');
+    $r->pnotes("$widget|name", '&quot;' . $object->get_name . '&quot;');
 }
 
 my $comp = $action . '_' . $section . '.html';
Index: debug.mc
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/widgets/debug/debug.mc,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -w -d -r1.11 -r1.12
--- debug.mc	4 Jun 2002 22:14:26 -0000	1.11
+++ debug.mc	30 Nov 2002 06:23:36 -0000	1.12
@@ -50,8 +50,7 @@
     $cache->{$id} = $Bric::App::Cache::STORE->get($id);
 }
 $cache = Data::Dumper::Dumper($cache);
-my %rcache = $rc->get_all;
-my $rcache = Data::Dumper::Dumper(\%rcache);
+my $rcache = Data::Dumper::Dumper($r->pnotes());
 
 $m->comp('/widgets/debug/agent.mc');
 $m->comp('/widgets/debug/dump.mc', sess => $s, env => $e,
Index: desk.mc
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/widgets/desk/desk.mc,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -w -d -r1.16 -r1.17
--- desk.mc	23 Oct 2002 20:53:12 -0000	1.16
+++ desk.mc	30 Nov 2002 06:23:37 -0000	1.17
@@ -52,7 +52,7 @@
 my $others;
 my $cached_assets = sub {
     my ($ckey, $desk, $user_id, $class, $meths, $sort_by) = @_;
-    my $objs = $rc->get("$widget.objs");
+    my $objs = $r->pnotes("$widget.objs");
     unless ($objs) {
         # We have no objects. So get 'em!
         if ($desk) {
@@ -100,7 +100,7 @@
     }
 
     # Cache them for this request.
-    $rc->set("$widget.objs", $objs);
+    $r->pnotes("$widget.objs", $objs);
 
     # Figure out what all we've got. We'll use this for displaying
     # relative links.
Index: desk_bottom.html
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/widgets/desk/desk_bottom.html,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -u -w -d -r1.1.1.1 -r1.2
--- desk_bottom.html	6 Sep 2001 21:52:05 -0000	1.1.1.1
+++ desk_bottom.html	30 Nov 2002 06:23:37 -0000	1.2
@@ -19,7 +19,7 @@
 </%args>
 
 <%init>
-my $d = $rc->get("desk.objs");
+my $d = $r->pnotes("desk.objs");
 return unless $d->{story} || $d->{media} || $d->{formatting};
 $wf ||= Bric::Biz::Workflow->lookup({ id => $w_id }) if defined $w_id;
 $desk ||= Bric::Biz::Workflow::Parts::Desk->lookup({ id => $d_id }) if defined \
                $d_id;
Index: desk_item.html
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/widgets/desk/desk_item.html,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -w -d -r1.15 -r1.16
--- desk_item.html	16 Oct 2002 04:50:21 -0000	1.15
+++ desk_item.html	30 Nov 2002 06:23:37 -0000	1.16
@@ -173,7 +173,7 @@
     $status = '&nbsp;';
 }
 
-my $cats = $rc->get("desk.cats") || {};
+my $cats = $r->pnotes("desk.cats") || {};
 my ($name, $date, $date_label, $cat);
 
 if ($class eq 'formatting') {
@@ -185,7 +185,7 @@
 	unless ($cat = $cats->{$cat_id}) {
 	    $cat = Bric::Biz::Category->lookup({ id => $cat_id })->get_name;
 	    $cats->{$cat_id} = $cat;
-	    $rc->set("desk.cats", $cats);
+	    $r->pnotes("desk.cats", $cats);
 	}
     } else {
 	$cat = '&nbsp;';
Index: media_prof.mc
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/widgets/media_prof/media_prof.mc,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -w -d -r1.6 -r1.7
--- media_prof.mc	31 Jan 2002 00:15:11 -0000	1.6
+++ media_prof.mc	30 Nov 2002 06:23:37 -0000	1.7
@@ -131,7 +131,7 @@
     # Make sure the user has the correct permissions
     chk_authz($media, $state eq 'edit' ? EDIT : READ);
     # Set the title for this request.
-    $rc->set("$widget|title", '&quot;' . $media->get_title . '&quot;');
+    $r->pnotes("$widget|title", '&quot;' . $media->get_title . '&quot;');
 }
 
 $m->comp($state.'_'.$section.'.html', widget => $widget, param => $param);
Index: story_prof.mc
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/widgets/story_prof/story_prof.mc,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -w -d -r1.6 -r1.7
--- story_prof.mc	31 Jan 2002 00:15:11 -0000	1.6
+++ story_prof.mc	30 Nov 2002 06:23:37 -0000	1.7
@@ -136,7 +136,7 @@
     # Make sure the user has the correct permissions
     chk_authz($story, $state eq 'edit' ? EDIT : READ);
     # Set the title for this request.
-    $rc->set("$widget|title", '&quot;' . $story->get_title . '&quot;');
+    $r->pnotes("$widget|title", '&quot;' . $story->get_title . '&quot;');
 }
 
 $m->comp($state.'_'.$section.'.html', widget => $widget, param => $param);
Index: tmpl_prof.mc
===================================================================
RCS file: /cvsroot/bricolage/bricolage/comp/widgets/tmpl_prof/tmpl_prof.mc,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -w -d -r1.6 -r1.7
--- tmpl_prof.mc	31 Jan 2002 00:15:11 -0000	1.6
+++ tmpl_prof.mc	30 Nov 2002 06:23:37 -0000	1.7
@@ -129,7 +129,7 @@
     # Make sure the user has the correct permissions
     chk_authz($fa, $state eq 'edit' ? EDIT : READ);
     # Set the title for this request.
-    $rc->set("$widget|name", '&quot;' . $fa->get_name . '&quot;');
+    $r->pnotes("$widget|name", '&quot;' . $fa->get_name . '&quot;');
 }
 
 $m->comp($state.'_'.$section.'.html', widget => $widget, param => $param);


-------------------------------------------------------
This SF.net email is sponsored by: Get the new Palm Tungsten T 
handheld. Power & Color in a compact size! 
http://ads.sourceforge.net/cgi-bin/redirect.pl?palm0002en
_______________________________________________
Bricolage-Commits mailing list
Bricolage-Commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/bricolage-commits

[prev in list] [next in list] [prev in thread] [next in thread] 

Configure | About | News | Add a list | Sponsored by KoreLogic