Skip to content

Commit

Permalink
refactor: cgi/ perl signatures (#7259)
Browse files Browse the repository at this point in the history
refactor: cgi/ perl signatures

Replacing Modern::Perl and utf8 with PerlStandards
  • Loading branch information
dipietroR authored Aug 26, 2022
1 parent fc3a513 commit ada6b09
Show file tree
Hide file tree
Showing 5 changed files with 5 additions and 10 deletions.
3 changes: 1 addition & 2 deletions cgi/product_image_rotate.pl
Original file line number Diff line number Diff line change
Expand Up @@ -20,8 +20,7 @@
# You should have received a copy of the GNU Affero General Public License
# along with this program. If not, see <https://www.gnu.org/licenses/>.

use Modern::Perl '2017';
use utf8;
use ProductOpener::PerlStandards;

use CGI::Carp qw(fatalsToBrowser);

Expand Down
3 changes: 1 addition & 2 deletions cgi/product_image_unselect.pl
Original file line number Diff line number Diff line change
Expand Up @@ -20,8 +20,7 @@
# You should have received a copy of the GNU Affero General Public License
# along with this program. If not, see <https://www.gnu.org/licenses/>.

use Modern::Perl '2017';
use utf8;
use ProductOpener::PerlStandards;

use CGI::Carp qw(fatalsToBrowser);

Expand Down
3 changes: 1 addition & 2 deletions cgi/product_image_upload.pl
Original file line number Diff line number Diff line change
Expand Up @@ -20,8 +20,7 @@
# You should have received a copy of the GNU Affero General Public License
# along with this program. If not, see <https://www.gnu.org/licenses/>.

use Modern::Perl '2017';
use utf8;
use ProductOpener::PerlStandards;

use CGI::Carp qw(fatalsToBrowser);

Expand Down
3 changes: 1 addition & 2 deletions cgi/product_jqm_multilingual.pl
Original file line number Diff line number Diff line change
Expand Up @@ -20,8 +20,7 @@
# You should have received a copy of the GNU Affero General Public License
# along with this program. If not, see <https://www.gnu.org/licenses/>.

use Modern::Perl '2017';
use utf8;
use ProductOpener::PerlStandards;

use CGI::Carp qw(fatalsToBrowser);

Expand Down
3 changes: 1 addition & 2 deletions cgi/recent_changes.pl
Original file line number Diff line number Diff line change
Expand Up @@ -20,8 +20,7 @@
# You should have received a copy of the GNU Affero General Public License
# along with this program. If not, see <https://www.gnu.org/licenses/>.

use Modern::Perl '2017';
use utf8;
use ProductOpener::PerlStandards;

use CGI::Carp qw(fatalsToBrowser);
use CGI qw/:cgi :form escapeHTML/;
Expand Down

0 comments on commit ada6b09

Please sign in to comment.