From e2f0a2c79c36baab81e9d944f666f1f9c83aa216 Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Sun, 23 Dec 2007 22:58:50 +0000 Subject: [PATCH] Various quota request improvements, suggested by docelic --- header.mlt.in | 1 + quota.mlt | 2 ++ quotas.sml | 2 +- 3 files changed, 4 insertions(+), 1 deletion(-) 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
Support requests
  • Request control of a domain with domtool
  • Request Debian apt packages
    • +
  • Request a disk quota change
  • Request a Mailman mailing list
  • Request an IP address
  • Request SSL certificate permissions
    • 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

    Request a disk quota change

    +

    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.

    +
    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 -- 2.20.1