cleanup: update lcd4linux file

2 files changed, 0 insertions, 30 deletions

diff --git a/kachelmann/changes b/kachelmann/changes
deleted file mode 100755
index 22116967..00000000
--- a/kachelmann/changes
+++ /dev/null
@@ -1,24 +0,0 @@
-#!/usr/bin/perl
-use XML::Simple;
-my $xml = new XML::Simple;
-my $xml_store = undef;
-my $data_new = undef;
-my $data_old = undef;
-my $condition_store = undef;
-
-
-my $data_old = $condition_store;
-while (1) {
-    &xml_update();
-    $data_old = $data_new;
-    $data_new = $condition_store;
-    if($data_new ne $data_old){
-        system("espeak \"Das Wetter hat sich von $data_old in $data_new verändert\n\"");
-    }
-    sleep 300;
-}
-sub xml_update(){
-    $xml_store = `w3m -dump "http://www.google.com/ig/api?weather=70327-stuttgart&hl=de"`;
-    $xml_store = $xml->XMLin($xml_store);
-    $condition_store = $xml_store->{weather}->{current_conditions}->{condition}->{data}; 
-}
diff --git a/kachelmann/conditions b/kachelmann/conditions
deleted file mode 100755
index ea4ba5ca..00000000
--- a/kachelmann/conditions
+++ /dev/null
@@ -1,6 +0,0 @@
-#!/usr/bin/perl
-use XML::Simple;
-my $result = `w3m -dump "http://www.google.com/ig/api?weather=70327-stuttgart&hl=de"`;
-my $xml = new XML::Simple;
-my $data = $xml->XMLin($result);
-print ("Die Wetterkondition ist: $data->{weather}->{current_conditions}->{condition}->{data}\n bei $data->{weather}->{current_conditions}->{temp_c}->{data} Grad Zelsius\n");