From: Adam Chlipala <adamc@hcoop.net>
Date: Sun, 23 Dec 2007 22:58:50 +0000 (+0000)
Subject: Various quota request improvements, suggested by docelic
X-Git-Url: https://git.hcoop.net/bpt/portal.git/commitdiff_plain/e2f0a2c79c36baab81e9d944f666f1f9c83aa216

Various quota request improvements, suggested by docelic
---

diff --git a/header.mlt.in b/header.mlt.in
index 6f76526..fb86bd5 100644
--- a/header.mlt.in
+++ b/header.mlt.in
@@ -32,6 +32,7 @@ Your account<br />
 Support requests<br />
 <li> <a href="domain">Request control of a domain with domtool</a></li>
 <li> <a href="apt">Request Debian apt packages</a></li>
+<li> <a href="quota">Request a disk quota change</a></li>
 <li> <a href="list">Request a Mailman mailing list</a></li>
 <li> <a href="ip">Request an IP address</a></li>
 <li> <a href="cert">Request SSL certificate permissions</a></li>
diff --git a/quota.mlt b/quota.mlt
index a10311c..e1eea1d 100644
--- a/quota.mlt
+++ b/quota.mlt
@@ -141,6 +141,8 @@ elseif $"mod" <> "" then
 
 <h3>Request a disk quota change</h3>
 
+<p>Remember that a high quota does not by itself use up any resources.  Quotas are solely a check on unintentional overusage.  We will only ever bill you for actual disk usage, not quota.  Therefore, it only makes sense to ask for a quota to be reduced if you want to prevent a runaway process or similar from upping your bill, not because you're worried about being a good co-op citizen.</p>
+
 <form method="post">
 
 <table>
diff --git a/quotas.sml b/quotas.sml
index 2d38b01..a667846 100644
--- a/quotas.sml
+++ b/quotas.sml
@@ -73,7 +73,7 @@ struct
 	in
 	    case kind of
 		"user" => "/afs/hcoop.net/user/" ^ goofy uname
-	      | "db" => "/afs/hcoop.net/.databases/" ^ goofy uname
+	      | "db" => "/afs/hcoop.net/common/.databases/" ^ goofy uname
 	      | "mail" => "/afs/hcoop.net/user/" ^ goofy uname ^ "/Maildir"
 	      | _ => raise Fail ("Don't know how to find mount point for volume " ^ vol)
 	end