[Rt-commit] [svn] r1192 - rtfm/trunk/html/RTFM/Article/Elements

[alexmv at pallas.eruditorum.org]

Author: alexmv
Date: Thu Jul  8 15:30:25 2004
New Revision: 1192

Modified:
   rtfm/trunk/html/RTFM/Article/Elements/EditBasics
   rtfm/trunk/html/RTFM/Article/Elements/EditLinks
Log:
 * More warnings cleanup; protect against "Trying to check
   RT::FM::Article rights for an unspecified RT::FM::Article"



Modified: rtfm/trunk/html/RTFM/Article/Elements/EditBasics
==============================================================================
--- rtfm/trunk/html/RTFM/Article/Elements/EditBasics	(original)
+++ rtfm/trunk/html/RTFM/Article/Elements/EditBasics	Thu Jul  8 15:30:25 2004
@@ -22,7 +22,7 @@
  <&|/l&>Name</&>
 </td>
 <td>
-<input name=Name value="<%$ArticleObj->Name || $ARGS{'Name'} |h%>"  SIZE=50>
+<input name="Name" value="<%($ARGS{'id'} eq 'new' ? "" : $ArticleObj->Name) || $ARGS{'Name'} |h%>" size="50" />
 </TD>
 </TR>
 <TR>
@@ -30,7 +30,7 @@
  <&|/l&>Summary</&>
 </td>
 <td>
-<input name=Summary value="<%$ArticleObj->Summary || $ARGS{'Summary'} |h%>"  SIZE=50>
+<input name="Summary" value="<%($ARGS{'id'} eq 'new' ? "" : $ArticleObj->Summary) || $ARGS{'Summary'} |h%>" size="50" />
 </TD>
 </TR>
 <TR>

Modified: rtfm/trunk/html/RTFM/Article/Elements/EditLinks
==============================================================================
--- rtfm/trunk/html/RTFM/Article/Elements/EditLinks	(original)
+++ rtfm/trunk/html/RTFM/Article/Elements/EditLinks	Thu Jul  8 15:30:25 2004
@@ -23,44 +23,48 @@
 <TABLE>
 <TR><TD><&|/l&>Refers to</&>:</TD><TD><input name="<%$id%>-RefersTo"><br>
 <UL>
-% my $refersto = $ArticleObj->RefersTo;
-% while (my $link = $refersto->Next) {
-% my $member = $link->TargetURI;
+% if ($id ne 'new') {
+%   my $refersto = $ArticleObj->RefersTo;
+%   while (my $link = $refersto->Next) {
+%     my $member = $link->TargetURI;
 <LI>
 <INPUT TYPE=CHECKBOX NAME="DeleteLink--<%$link->Type%>-<%$link->Target%>">
-% if ($link->TargetURI->IsLocal) {
+%     if ($link->TargetURI->IsLocal) {
 <a href="<%$member->Resolver->HREF%>"><%$member->Object->Id%></a>: 
-% if (UNIVERSAL::can($member->Object, 'Name')) {
+%       if (UNIVERSAL::can($member->Object, 'Name')) {
 <%$member->Object->Name%>
-% } elsif (UNIVERSAL::can($member->Object, 'Subject')) {
+%       } elsif (UNIVERSAL::can($member->Object, 'Subject')) {
 <%$member->Object->Subject%>
-% }
+%       }
 </a>
-% } else {
+%     } else {
 <A HREF="<%$member->Resolver->HREF%>"><%$link->Target%></A>
+%     }
+%   }
 % }
-%}
 </UL>
 </TD></TR>
 <TR><TD><&|/l&>Referred to by</&>:</TD><TD> <input name="RefersTo-<%$id%>">
 <br>
 <UL>
-% my $referredtoby = $ArticleObj->ReferredToBy;
-% while (my $link = $referredtoby->Next) {
-% my $member = $link->BaseURI;
+% if ($id ne 'new') {
+%   my $referredtoby = $ArticleObj->ReferredToBy;
+%   while (my $link = $referredtoby->Next) {
+%     my $member = $link->BaseURI;
 <LI>
 <INPUT TYPE=CHECKBOX NAME="DeleteLink-<%$link->Base%>-<%$link->Type%>-">
-% if ($link->BaseURI->IsLocal) {
+%     if ($link->BaseURI->IsLocal) {
 <a href="<%$member->Resolver->HREF%>"><%$member->Object->Id%></a>: 
-% if (UNIVERSAL::can($member->Object, 'Name')) {
+%       if (UNIVERSAL::can($member->Object, 'Name')) {
 <%$member->Object->Name%>
-% } elsif (UNIVERSAL::can($member->Object, 'Subject')) {
+%       } elsif (UNIVERSAL::can($member->Object, 'Subject')) {
 <%$member->Object->Subject%>
-% }
+%       }
 </a>
-% } else {
+%     } else {
 <A HREF="<%$member->Resolver->HREF%>"><%$link->Base%></A>
-%}
+%     }
+%   }
 % }
 </UL>