[PATCH] gnu: Add bypass-paywalls-chromium.

  • Open
  • quality assurance status badge
Details
One participant
  • Wamm K. D
Owner
unassigned
Submitted by
Wamm K. D
Severity
normal
W
W
Wamm K. D wrote on 24 Oct 2022 17:56
(address . guix-patches@gnu.org)(name . Wamm K. D)(address . jaft.r@outlook.com)
BY5PR07MB70296514B048F17BA6C4F35C992E9@BY5PR07MB7029.namprd07.prod.outlook.com
* gnu/packages/browser-extensions.scm (bypass-paywalls-chromium): Add new Chromium extension.
---
gnu/packages/browser-extensions.scm | 63 +++++++++++++++++++++++++++++
1 file changed, 63 insertions(+)

Toggle diff (80 lines)
diff --git a/gnu/packages/browser-extensions.scm b/gnu/packages/browser-extensions.scm
index db27101b9b..d2bf4f1480 100644
--- a/gnu/packages/browser-extensions.scm
+++ b/gnu/packages/browser-extensions.scm
@@ -17,6 +17,7 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (gnu packages browser-extensions)
+ #:use-module (guix gexp)
#:use-module (guix packages)
#:use-module (guix git-download)
#:use-module (guix build-system copy)
@@ -109,3 +110,65 @@ (define ublock-origin
(define-public ublock-origin/chromium
(make-chromium-extension ublock-origin "chromium"))
+
+(define bypass-paywalls
+ (package
+ (name "bypass-paywalls")
+ (version "1.8.0")
+ (source (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/iamadamdev/bypass-paywalls-chrome")
+ (commit (string-append "v" version))))
+ (sha256 (base32
+ "103917jsn6py3wi4gw216rs6winrd1wkkag1zqxczkf2y7c9bndb"))))
+ (build-system gnu-build-system)
+ (native-inputs (list p7zip))
+ (outputs '("xpi" "firefox" "chromium"))
+ (arguments
+ (list
+ #:phases #~(modify-phases (map (lambda (phase)
+ (assq phase %standard-phases))
+ '(set-paths unpack patch-source-shebangs))
+ (add-after 'patch-source-shebangs 'prepare-build
+ (lambda _
+ (chdir "build")
+
+ (mkdir-p "firefox")
+ (mkdir-p "chromium")
+
+ (substitute* "build.sh"
+ (("# Remove temp files")
+ "cp $FF_FILES firefox
+mv firefox/temp-ff-manifest.json firefox/manifest.json
+mv firefox/temp-background.js firefox/background.js
+mv firefox/temp-options.html firefox/options.html
+mv firefox/temp-popup.html firefox/popup.html
+
+cp $CH_FILES chromium
+mv chromium/temp-chrome-manifest.json chromium/manifest.json
+mv chromium/temp-background.js chromium/background.js
+mv chromium/temp-options.html chromium/options.html
+mv chromium/temp-popup.html chromium/popup.html
+
+# Remove temp files"))))
+ (add-after 'prepare-build 'build
+ (lambda _
+ (invoke "./build.sh")))
+ (add-after 'build 'install
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((firefox (assoc-ref outputs "firefox"))
+ (xpi (assoc-ref outputs "xpi"))
+ (chromium (assoc-ref outputs "chromium")))
+ (install-file "output/bypass-paywalls.xpi"
+ (string-append xpi "/lib/mozilla/extensions"))
+ (copy-recursively "firefox" firefox)
+ (copy-recursively "chromium" chromium)))))))
+ (home-page "https://github.com/iamadamdev/bypass-paywalls-chrome")
+ (synopsis "Bypass Paywalls web-browser extension")
+ (description "Bypass Paywalls displays web pages without their paywalls, for
+IceCat and ungoogled-chromium.")
+ (license license:expat)))
+
+(define-public bypass-paywalls/chromium
+ (make-chromium-extension bypass-paywalls "chromium"))
--
2.38.0
?