![]() |
<% $lang->maketext('ID') %>: | <% $id %> | |
![]() |
|||
![]() |
<% $lang->maketext('Story Type Element') %>: | <% $story->get_element_name %> | |
![]() |
|||
![]() |
<% $lang->maketext('Current Version') %>: | <% $story->get_current_version %> | |
![]() |
|||
![]() |
<% $lang->maketext('Published Version') %>: | <% $story->get_published_version || '' %> | |
![]() |
|||
![]() |
<% $lang->maketext('First Published') %>: | <% $story->get_first_publish_date || '' %> | |
![]() |
|||
![]() |
<% $lang->maketext('Last Published') %>: | <% $story->get_publish_date || '' %> | |
![]() |
|||
![]() |
<% $lang->maketext('URI') %>: | % if (@ocs == 1) {<% $m->comp('/widgets/profile/preview_link.mc', type => 'story', title => $story->get_primary_uri, doc => $story, style => 'blackUnderlinedLink') %> | % } else {<% $story->get_primary_uri %> |
![]() |
|||
![]() |
<% $lang->maketext('Preview in') %>: | <% $oc_select %> <% $m->comp('/widgets/profile/preview_link.mc', type => 'story', title => $story->get_primary_uri, doc => $story, oc_js => 'window.document.theForm.ocSelect.options[window.document.theForm.ocSelect.selectedIndex].value', style => 'blackUnderlinedLink') %> | % }|
![]() |
|||
![]() |
<% $lang->maketext('Site') %>: | <% Bric::Biz::Site->lookup({id => $story->get_site_id})-> get_name() %> | |
![]() |
![]() |
<% $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", constrain => { site_id => $story->get_site_id }, exclude => $excl_sub, field => 'uri', sort_field => 'uri', useTable => 0 &> |
![]() |
<% $lang->maketext('Type') %> | ![]() |
<% $lang->maketext('Values') %> | ![]() |
<% $lang->maketext('Action') %> |
<% $lang->maketext('Categories') %>: |
<%perl>
my @cats;
my $primary_cat_uri = $story->get_primary_category->get_uri;
push @cats, $primary_cat_uri;
foreach my $cat ($story->get_secondary_categories) {
push @cats, $cat->get_uri;
}
$m->out(scalar(@cats) ? join(' ', @cats) : $lang->maketext("No categories defined.")); %perl> |
<& '/widgets/profile/imageSubmit.mc', formName => "theForm", callback => "$widget|categories_cb", image => "edit_lgreen", vspace => 4 &> |
![]() |
<% $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> |
% if ($story->get_alias_id) {
![]() |
![]() |