summaryrefslogtreecommitdiffhomepage
path: root/src/perl
diff options
context:
space:
mode:
authorAndrew Clayton <a.clayton@nginx.com>2024-06-21 23:56:20 +0100
committerAndrew Clayton <a.clayton@nginx.com>2024-06-24 22:30:39 +0100
commit5c4911a35e289d1813daeab61bf7e347d7bea3f3 (patch)
tree19897671bc9796d9fda03aaf60c71af1369854c9 /src/perl
parentc7e921c7f8ee352b2b764de2c12cd39dace2e3d3 (diff)
downloadunit-5c4911a35e289d1813daeab61bf7e347d7bea3f3.tar.gz
unit-5c4911a35e289d1813daeab61bf7e347d7bea3f3.tar.bz2
perl: Constify some local static variables
These somehow got missed in my previous constification patches... Signed-off-by: Andrew Clayton <a.clayton@nginx.com>
Diffstat (limited to 'src/perl')
-rw-r--r--src/perl/nxt_perl_psgi.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/perl/nxt_perl_psgi.c b/src/perl/nxt_perl_psgi.c
index 807d1741..271494ac 100644
--- a/src/perl/nxt_perl_psgi.c
+++ b/src/perl/nxt_perl_psgi.c
@@ -407,7 +407,7 @@ nxt_perl_psgi_module_create(const char *script)
char *buf, *p;
size_t length;
- static nxt_str_t prefix = nxt_string(
+ static const nxt_str_t prefix = nxt_string(
"package NGINX::Unit::Sandbox;"
"sub new {"
" return bless {}, $_[0];"
@@ -415,7 +415,7 @@ nxt_perl_psgi_module_create(const char *script)
"{my $app = do \""
);
- static nxt_str_t suffix = nxt_string_zero(
+ static const nxt_str_t suffix = nxt_string_zero(
"\";"
"unless ($app) {"
" if($@ || $1) {die $@ || $1}"