Committer: sbelyaev
LJSUP-9832: Functionality restored.U trunk/cgi-bin/LJ/DelayedEntry.pm U trunk/htdocs/admin/entryprops.bml
Modified: trunk/cgi-bin/LJ/DelayedEntry.pm =================================================================== --- trunk/cgi-bin/LJ/DelayedEntry.pm 2012-01-31 11:36:38 UTC (rev 21050) +++ trunk/cgi-bin/LJ/DelayedEntry.pm 2012-01-31 12:08:55 UTC (rev 21051) @@ -8,6 +8,23 @@ #common methodss +sub create_from_url { + my ($class, $url, $opts) = @_; + + if ($url =~ m!(.+)/d(\d+)\.html!) { + my $username = $1; + my $delayed_id = $2; + my $u = LJ::User->new_from_url($username) or return undef; + return LJ::DelayedEntry->get_entry_by_id($u, $delayed_id, $opts); + } + + return undef; +} + +sub valid { + return 1; +} + sub is_delayed { return 1; } Modified: trunk/htdocs/admin/entryprops.bml =================================================================== --- trunk/htdocs/admin/entryprops.bml 2012-01-31 11:36:38 UTC (rev 21050) +++ trunk/htdocs/admin/entryprops.bml 2012-01-31 12:08:55 UTC (rev 21051) @@ -24,6 +24,9 @@ $ret .= "<?hr?>"; my $entry = LJ::Entry->new_from_url($GET{url}); + if (!$entry) { + $entry = LJ::DelayedEntry->create_from_url($GET{url}, { 'delayed_visibility' => 1}); + } unless ($entry && $entry->valid) { $ret .= LJ::error_list("$POST{url} is not a valid entry URL.") if LJ::did_post(); @@ -61,7 +64,10 @@ $ret .= "<strong>Server Date/Time</strong>: " . $entry->logtime_mysql . "<br />"; $ret .= "<strong>Journal Adult Content</strong>: " . ($entry->journal->adult_content || "none") . " (admin setting: " . ($entry->journal->admin_content_flag || "none") . ")<br />"; - $ret .= "<strong>Skip/iNclude in recent entries</strong>: " . $entry->get_suspended_mark . "<br />"; + + if (!$entry->is_delayed) { + $ret .= "<strong>Skip/iNclude in recent entries</strong>: " . $entry->get_suspended_mark . "<br />"; + } $ret .= "<br />"; my %props = %{$entry->props || {}};