diff --git a/quotacheck/Notes b/quotacheck/Notes
new file mode 100644
index 0000000..1551653
--- /dev/null
+++ b/quotacheck/Notes
@@ -0,0 +1,22 @@
+Change to use statemachine:
+
+    States:
+
+	ok
+	soft
+	soft-urgent
+	hard
+	ok-again
+
+	soft-urgent is soft, but expiry is < $n$ hours (48?) away.
+	All non-ok states revert to ok-again. ok-again turns into
+	ok after $n$ hours (168?).
+
+	Notifications are sent on all state transitions except
+	ok->ok-again and periodically in the states soft-urgent and
+	hard.
+
+	The message text reflects the different states.
+
+	The graph is updated in all states except ok.
+	
diff --git a/quotacheck/quotacheck.pl b/quotacheck/quotacheck.pl
index 34b534f..020f1a7 100644
--- a/quotacheck/quotacheck.pl
+++ b/quotacheck/quotacheck.pl
@@ -43,7 +43,7 @@ sub warnmsg {
 	    "andere Netzplatte verschieben.\n" .
 	    "\n" .
 	    "Sie können sich Ihre Verbrauchsgraphen unter\n" .
-	    "http://sww.wsr.ac.at/intranet/quotas/$user$mount_t.gif ansehen. \n" .
+	    "http://intra.wsr.ac.at/informationssysteme/quotas/$user$mount_t.gif ansehen. \n" .
 	    "Der Graph zeigten den verbrauchten Platz ('used') sowie die beiden\n" .
 	    "Quotas ('soft' und 'hard')\n" .
 	    "Die Softquota können Sie kurzfristig (bis zu einer Woche) überschreiten,\n" .
@@ -175,7 +175,7 @@ for my $ln (@df) {
 		if (system (@startgraph) != 0) {
 		    die "cannot execute @startgraph";
 		}
-		system("@@@scp@@@", "/usr/local/www/wsr/intranet/quotas/$user$mount_t.gif", "sww.wsr.ac.at:/usr/local/www/wsr/intranet/quotas/$user$mount_t.gif");
+		system("@@@scp@@@", "/usr/local/www//wsr/intranet/quotas/$user$mount_t.gif", "intra.wsr.ac.at:/usr/local/www/intra/informationssysteme/quotas/$user$mount_t.gif");
 
 		if (!-e $timestamp) {
 		    sendmail($user, $msg, $mount);