| 144 | | if ( $type eq 'entry' ) { |
|---|
| 145 | | |
|---|
| 146 | | # We only use new entry defaults on new entries. |
|---|
| 147 | | my $def_status = $q->param('status') |
|---|
| 148 | | || $blog->status_default; |
|---|
| 149 | | if ($def_status) { |
|---|
| 150 | | $param->{ "status_" |
|---|
| 151 | | . MT::Entry::status_text($def_status) } = 1; |
|---|
| 152 | | } |
|---|
| 153 | | if ( $param->{status} ) { |
|---|
| 154 | | $param->{ 'allow_comments_' |
|---|
| 155 | | . $q->param('allow_comments') } = 1; |
|---|
| 156 | | $param->{allow_comments} = $q->param('allow_comments'); |
|---|
| 157 | | $param->{allow_pings} = $q->param('allow_pings'); |
|---|
| 158 | | } |
|---|
| 159 | | else { |
|---|
| 160 | | # new edit |
|---|
| 161 | | $param->{ 'allow_comments_' |
|---|
| 162 | | . $blog->allow_comments_default } = 1; |
|---|
| 163 | | $param->{allow_comments} = $blog->allow_comments_default; |
|---|
| 164 | | $param->{allow_pings} = $blog->allow_pings_default; |
|---|
| 165 | | } |
|---|
| | 144 | |
|---|
| | 145 | # new entry defaults used for new entries AND new pages. |
|---|
| | 146 | my $def_status = $q->param('status') |
|---|
| | 147 | || $blog->status_default; |
|---|
| | 148 | if ($def_status) { |
|---|
| | 149 | $param->{ "status_" |
|---|
| | 150 | . MT::Entry::status_text($def_status) } = 1; |
|---|
| | 151 | } |
|---|
| | 152 | if ( $param->{status} ) { |
|---|
| | 153 | $param->{ 'allow_comments_' |
|---|
| | 154 | . $q->param('allow_comments') } = 1; |
|---|
| | 155 | $param->{allow_comments} = $q->param('allow_comments'); |
|---|
| | 156 | $param->{allow_pings} = $q->param('allow_pings'); |
|---|
| | 157 | } |
|---|
| | 158 | else { |
|---|
| | 159 | # new edit |
|---|
| | 160 | $param->{ 'allow_comments_' |
|---|
| | 161 | . $blog->allow_comments_default } = 1; |
|---|
| | 162 | $param->{allow_comments} = $blog->allow_comments_default; |
|---|
| | 163 | $param->{allow_pings} = $blog->allow_pings_default; |
|---|
