From 042d5b217b47144bd9d962f288c6bd66f987c44f Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Stig-=C3=98rjan=20Smelror?= <smelror@gmail.com>
Date: Fri, 2 Feb 2024 10:51:05 +0100
Subject: [PATCH] _pages: Use sed instead of Perl for BODY

---
 qsgen2 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/qsgen2 b/qsgen2
index 8a67da2..b3926dc 100755
--- a/qsgen2
+++ b/qsgen2
@@ -448,7 +448,7 @@ function _pages() {
         # Insert page_content into pages_tpl by replacing the BODY tag present there
         if (${debug}) _msg debug "_pages: Replacing BODY with page_content in pages_tpl using Perl"
         # Use Perl for multi-line and special character handling
-        local pages_tpl=$( echo "${pages_tpl}" | perl -pe "s|BODY|\"${page_content}\"|gs" )
+        local pages_tpl=$( echo "${pages_tpl}" | sed -e "s|BODY|\"${page_content}\"|" )
         
         # Replace every #pagetitle in pages_tpl
         if (${debug}) _msg debug "_pages: Replacing #pagetitle in pages_tpl"