From c5f283d64140112e4536ac85c15bd7caad980732 Mon Sep 17 00:00:00 2001 From: Christian Brabandt Date: Wed, 11 Mar 2026 21:50:48 +0000 Subject: [PATCH] patch 9.2.0141: :perl ex commands allowed in restricted mode Problem: :perl ex commands allowed in restricted mode (pyllyukko) Solution: Add EX_RESTRICT flag to :perldo/:perl command definition. closes: #19653 Signed-off-by: Christian Brabandt --- src/ex_cmds.h | 4 ++-- src/version.c | 2 ++ 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/src/ex_cmds.h b/src/ex_cmds.h index f51f584e05..7613d18aa1 100644 --- a/src/ex_cmds.h +++ b/src/ex_cmds.h @@ -1158,10 +1158,10 @@ EXCMD(CMD_pclose, "pclose", ex_pclose, EX_BANG|EX_TRLBAR, ADDR_NONE), EXCMD(CMD_perl, "perl", ex_perl, - EX_RANGE|EX_EXTRA|EX_DFLALL|EX_NEEDARG|EX_SBOXOK|EX_CMDWIN|EX_LOCK_OK, + EX_RANGE|EX_EXTRA|EX_DFLALL|EX_NEEDARG|EX_SBOXOK|EX_CMDWIN|EX_LOCK_OK|EX_RESTRICT, ADDR_LINES), EXCMD(CMD_perldo, "perldo", ex_perldo, - EX_RANGE|EX_EXTRA|EX_DFLALL|EX_NEEDARG|EX_CMDWIN|EX_LOCK_OK, + EX_RANGE|EX_EXTRA|EX_DFLALL|EX_NEEDARG|EX_CMDWIN|EX_LOCK_OK|EX_RESTRICT, ADDR_LINES), EXCMD(CMD_pedit, "pedit", ex_pedit, EX_BANG|EX_FILE1|EX_CMDARG|EX_ARGOPT|EX_TRLBAR, diff --git a/src/version.c b/src/version.c index 8c1f6c30a0..a3ef8c1c92 100644 --- a/src/version.c +++ b/src/version.c @@ -734,6 +734,8 @@ static char *(features[]) = static int included_patches[] = { /* Add new patch number below this line */ +/**/ + 141, /**/ 140, /**/