From f9cfef3a1936770072446df241ddba203cb32a22 Mon Sep 17 00:00:00 2001 From: Paul Buetow Date: Wed, 10 Apr 2013 08:21:31 +0200 Subject: foo --- fype0.buetow.org/content/Examples.xml | 13 +------------ 1 file changed, 1 insertion(+), 12 deletions(-) (limited to 'fype0.buetow.org') diff --git a/fype0.buetow.org/content/Examples.xml b/fype0.buetow.org/content/Examples.xml index 6e41595..8ff2e6d 100644 --- a/fype0.buetow.org/content/Examples.xml +++ b/fype0.buetow.org/content/Examples.xml @@ -4,18 +4,7 @@ use LWP::Simple; - my $site = get 'https://ssl.buetow.org/repos/fype/branches/experimental/build-009669/examples/'; - my @sites = $site =~ /file name="(.*?\.fy)" .*/g; - my @return; - - for my $site (sort @sites) { - push @return, "!!LT!!h2!!GT!!$site!!LT!!/h2!!GT!!"; - push @return, '!!LT!!pre class="code"!!GT!!'; - push @return, get "https://ssl.buetow.org/repos/fype/branches/experimental/build-009669/examples/$site"; - push @return, '!!LT!!/pre!!GT!!'; - } - - return join '', @return; + get 'http://web.buetow.org/git/?p=fype.git;a=blob_plain;f=examples/all-examples.txt;hb=build-009669'; -- cgit v1.2.3