![]() |
<% $lang->maketext('ID') %>: | <% $id %> |
![]() |
||
![]() |
<% $lang->maketext('Story Type') %>: | <% $story->get_element_name %> |
![]() |
||
![]() |
<% $lang->maketext('Current Version') %>: | <% $story->get_current_version %> |
![]() |
||
![]() |
<% $lang->maketext('Published Version') %>: | <% $story->get_published_version %> |
![]() |
||
![]() |
<% $lang->maketext('URI') %>: | % if (@ocs == 1) {<% $story->get_primary_uri %> | <% $story->get_primary_uri %> |
![]() |
||
![]() |
<% $lang->maketext('Preview in') %>: | <% $oc_select %> ![]() |
![]() |
![]() |
<% $lang->maketext('Name') %> | ![]() |
<% $lang->maketext('URI') %> | ![]() |
<% $lang->maketext('Primary') %> | ![]() |
class="medHeader">![]() |
<% $lang->maketext('Delete') %> |
![]() |
<% $_->get_name %> | <% $_->get_uri %> | > | % if ($cat_id != $p_id) { <& '/widgets/profile/checkbox.mc', name => "$widget|delete_cat", value => $_->get_id &> % } | ||||
<% $lang->maketext('This story has not been assigned to a category.')%> | ||||||||
><& '/widgets/profile/imageSubmit.mc', formName => "theForm", callback => "$widget|add_category_cb", image => "add_category_lgreen", vspace => 3, hspace => 2 &> | valign="middle"> <& '/widgets/select_object/select_object.mc', object => 'category', name => "$widget|new_category_id", exclude => $excl_sub, field => 'uri', sort_field => 'uri', useTable => 0 &> |
![]() |
<% $lang->maketext('Type') %> | ![]() |
<% $lang->maketext('Values') %> | ![]() |
<% $lang->maketext('Action') %> |
<% $lang->maketext('Keywords') %>: | <%perl> my @keywords; foreach my $kw ($story->get_keywords) { push @keywords, $kw->get_name; } $m->out(scalar(@keywords) ? join(", ", @keywords) : $lang->maketext("No keywords defined.")); %perl> | <& '/widgets/profile/imageSubmit.mc', formName => "theForm", callback => "$widget|keywords_cb", image => "edit_lgreen", vspace => 4 &> |
![]() |
<% $lang->maketext('Contributors') %>: | <%perl> my @contribs; foreach my $cntr ($story->get_contributors) { push @contribs, $cntr->get_name; } $m->out(scalar(@contribs) ? join(", ", @contribs) : $lang->maketext("No contributors defined.")); %perl> | <& '/widgets/profile/imageSubmit.mc', formName => "theForm", callback => $widget . "|contributors_cb", image => "edit_lgreen", vspace => 3 &> |
![]() |