From 3969e3004985cef058ba313f030ed0fff4a5b6bc Mon Sep 17 00:00:00 2001
From: Efraim Flashner
Date: Fri, 25 Oct 2019 08:47:21 -0500
Subject: gn: bnw: Unconditionally browse from the local directory.

* gn/packages/bnw.scm (bnw)[arguments]: Add to custom 'patch-source
phase a workaround to always browse the website from the originating
url.
---
 gn/packages/bnw.scm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/gn/packages/bnw.scm b/gn/packages/bnw.scm
index 036fe2b..99de4fc 100644
--- a/gn/packages/bnw.scm
+++ b/gn/packages/bnw.scm
@@ -35,6 +35,8 @@
            (delete 'configure)
            (add-after 'unpack 'patch-source
              (lambda _
+               (substitute* "index.html"
+                 (("url=home.php") "url=sourcecodes/home.php"))
                (substitute* "sourcecodes/header_batchsearch.inc"
                  (("my_style.css") "my_new_style.css"))
                #t))
-- 
cgit v1.2.3