aboutsummaryrefslogtreecommitdiff
path: root/gn/packages
diff options
context:
space:
mode:
Diffstat (limited to 'gn/packages')
-rw-r--r--gn/packages/genenetwork.scm19
1 files changed, 13 insertions, 6 deletions
diff --git a/gn/packages/genenetwork.scm b/gn/packages/genenetwork.scm
index 282af31..a621124 100644
--- a/gn/packages/genenetwork.scm
+++ b/gn/packages/genenetwork.scm
@@ -822,24 +822,31 @@ written in C")
#t)))
(add-after 'unpack 'use-local-links
(lambda _
- (substitute* "web/webqtl/base/webqtlConfig.py"
- (("http://www.genenetwork.org") ""))
+ (substitute* '("web/javascript/menu_items.js"
+ "web/webqtl/base/webqtlConfig.py"
+ "web/webqtl/maintainance/updateMenuJS.py")
+ (("http://(www|gn1).genenetwork.org") ""))
;; Move this file out of the way while patching files.
(rename-file "web/infoshare/manager/MDB-Free/index.html"
"web/infoshare/manager/MDB-Free/index.htm")
- (substitute* (cons
+ (substitute* (cons*
"web/webqtl/base/indexBody.py"
+ "web/webqtl/submitTrait/BatchSubmitPage.py"
(find-files "web" "\\.html"))
((".*base href.*") "")
(("(HREF|href)=\\\"http://(www.)?genenetwork.org")
"href=\""))
- (substitute* "web/webqtl/base/indexBody.py"
- (("src=\\\"http://www.genenetwork.org") "src=\""))
-
;; Move this file back to its original location.
(rename-file "web/infoshare/manager/MDB-Free/index.htm"
"web/infoshare/manager/MDB-Free/index.html")
+
+ (substitute* (cons*
+ "web/humanCross.html"
+ "web/webqtl/base/indexBody.py"
+ "web/whats_new.html"
+ (find-files "web/dbdoc" "\\.html"))
+ (("src=\\\"http://www.genenetwork.org") "src=\""))
#t))
(add-before 'install 'replace-htaccess-file
(lambda _