| … | |
… | |
| 211 | die "effective user $eUserID not found. One 'acts as' the effective user." unless $effectiveUser; |
211 | die "effective user $eUserID not found. One 'acts as' the effective user." unless $effectiveUser; |
| 212 | # FIXME: this was already caught in initialize() |
212 | # FIXME: this was already caught in initialize() |
| 213 | die "set $setID for effectiveUser $eUserID not found." unless $set; |
213 | die "set $setID for effectiveUser $eUserID not found." unless $set; |
| 214 | |
214 | |
| 215 | my $psvn = $set->psvn(); |
215 | my $psvn = $set->psvn(); |
| 216 | |
216 | my $screenSetHeader = ($set->set_header eq "defaultHeader") ? |
| 217 | my $screenSetHeader = $set->set_header || $ce->{webworkFiles}->{screenSnippets}->{setHeader}; |
217 | $ce->{webworkFiles}->{screenSnippets}->{setHeader} : |
|
|
218 | $set->set_header; |
|
|
219 | |
| 218 | my $displayMode = $r->param("displayMode") || $ce->{pg}->{options}->{displayMode}; |
220 | my $displayMode = $r->param("displayMode") || $ce->{pg}->{options}->{displayMode}; |
| 219 | |
221 | |
| 220 | if ($authz->hasPermissions($userID, "modify_problem_sets")) { |
222 | if ($authz->hasPermissions($userID, "modify_problem_sets")) { |
| 221 | if (defined $r->param("editMode") and $r->param("editMode") eq "temporaryFile") { |
223 | if (defined $r->param("editMode") and $r->param("editMode") eq "temporaryFile") { |
| 222 | $screenSetHeader = $r->param('sourceFilePath'); |
224 | $screenSetHeader = $r->param('sourceFilePath'); |