summaryrefslogtreecommitdiff
path: root/overlays/FinanceQuote
diff options
context:
space:
mode:
authorGregor Kleen <gkleen@yggdrasil.li>2026-08-20 17:31:15 +0200
committerGregor Kleen <gkleen@yggdrasil.li>2026-08-20 17:31:15 +0200
commit91061f7aa842983b5206641b346d3fbc9a9acc67 (patch)
treedff099410d91eee6d88ddb02fe77d97ddc658d56 /overlays/FinanceQuote
parentc6fb54d897ebd83ba27f3c78aafafe65c4a4338e (diff)
downloadnixos-91061f7aa842983b5206641b346d3fbc9a9acc67.tar
nixos-91061f7aa842983b5206641b346d3fbc9a9acc67.tar.gz
nixos-91061f7aa842983b5206641b346d3fbc9a9acc67.tar.bz2
nixos-91061f7aa842983b5206641b346d3fbc9a9acc67.tar.xz
nixos-91061f7aa842983b5206641b346d3fbc9a9acc67.zip
bump
Diffstat (limited to 'overlays/FinanceQuote')
-rw-r--r--overlays/FinanceQuote/default.nix11
-rw-r--r--overlays/FinanceQuote/tradegate.patch18
2 files changed, 0 insertions, 29 deletions
diff --git a/overlays/FinanceQuote/default.nix b/overlays/FinanceQuote/default.nix
deleted file mode 100644
index 45c7d833..00000000
--- a/overlays/FinanceQuote/default.nix
+++ /dev/null
@@ -1,11 +0,0 @@
1{ prev, final, ... }: {
2 perlPackages = (final.perl.override {
3 overrides = p: {
4 FinanceQuote = prev.perl.pkgs.FinanceQuote.overrideAttrs (oldAttrs: {
5 patches = (oldAttrs.patches or []) ++ [
6 ./tradegate.patch
7 ];
8 });
9 };
10 }).pkgs;
11}
diff --git a/overlays/FinanceQuote/tradegate.patch b/overlays/FinanceQuote/tradegate.patch
deleted file mode 100644
index f1081fc4..00000000
--- a/overlays/FinanceQuote/tradegate.patch
+++ /dev/null
@@ -1,18 +0,0 @@
1--- old/lib/Finance/Quote/Tradegate.pm
2+++ new/lib/Finance/Quote/Tradegate.pm
3@@ -98,12 +98,13 @@
4 @child = $td1->content_list;
5 my $exchange = $child[0];
6
7 $td1 = ($lastvalue->look_down('_tag'=>'td'))[7];
8 @child = $td1->content_list;
9- my $date = substr($child[0], 0, 8);
10- my $time = substr($child[0], 9, 5); # CE(S)T
11+ $child[0] =~ /(?<date>\d{2}\.\d{2}\.\d{2,4})\s*\/\s*(?<time>\d{2}:\d{2})/;
12+ my $date = $+{date};
13+ my $time = $+{time};
14
15 $td1 = ($lastvalue->look_down('_tag'=>'td'))[9];
16 @child = $td1->content_list;
17 my $price = $child[0];
18 $price =~ s/\.//g;