Allow for revoking promotion purchasing permission

classes/users.class.php

           i.DisableAvatar,
           i.DisablePM,
           i.DisableNips,
+          i.DisablePromotion,
           i.DisableRequests,
           i.DisableForums,
           i.DisableTagging,

sections/store/promotion.php

       $Err[] = "You cannot be promoted while warned";
     }
 
+    if ($LoggedUser['DisablePromotion']) {
+      $Err[] = "You have been banned from purchasing promotions";
+    }
+
     if ($BP < $Classes[$To]['Price']) {
       $Err[] = "Not enough points";
     }

sections/user/takemoderate.php

 $DisableWiki = isset($_POST['DisableWiki']) ? 1 : 0;
 $DisablePM = isset($_POST['DisablePM']) ? 1 : 0;
 $DisableNips = isset($_POST['DisableNips']) ? 1 : 0;
+$DisablePromotion = isset($_POST['DisablePromotion']) ? 1 : 0;
 $DisableIRC = isset($_POST['DisableIRC']) ? 1 : 0;
 $DisableRequests = isset($_POST['DisableRequests']) ? 1 : 0;
 $DisableLeech = isset($_POST['DisableLeech']) ? 0 : 1;
     DisableWiki,
     DisablePM,
     DisableNips,
+    DisablePromotion,
     DisableIRC,
     DisableRequests,
     m.RequiredRatio,
   $EditSummary[] = 'Nip earning ' . ($DisableNips ? 'disabled' : 'enabled');
   $HeavyUpdates['DisableNips'] = $DisableNips;
   if (!empty($UserReason)) {
-    Misc::send_pm($UserID, 0, 'Your Nip-earning ability has been disabled', "Your Nip-earning ability been disabled. The reason given was: [quote]{$UserReason}[/quote] If you would like to discuss this, please join ".BOT_DISABLED_CHAN.' on our IRC network. Instructions can be found [url='.site_url().'wiki.php?action=article&name=IRC+-+How+to+join]here[/url].');
+    Misc::send_pm($UserID, 0, 'Your Nip-earning ability has been disabled', "Your Nip-earning ability has been disabled. The reason given was: [quote]{$UserReason}[/quote] If you would like to discuss this, please join ".BOT_DISABLED_CHAN.' on our IRC network. Instructions can be found [url='.site_url().'wiki.php?action=article&name=IRC+-+How+to+join]here[/url].');
+  }
+}
+
+if ($DisablePromotion != $Cur['DisablePromotion'] && check_perms('users_disable_any')) {
+  $UpdateSet[] = "DisablePromotion = '$DisablePromotion'";
+  $EditSummary[] = 'Class purchasing ' . ($DisablePromotion ? 'disabled' : 'enabled');
+  $HeavyUpdates['DisablePromotion'] = $DisablePromotion;
+  if (!empty($UserReason)) {
+    Misc::send_pm($UserID, 0, 'Your promotion purchasing ability has been disabled', "Your promotion purchasing ability has been disabled. The reason given was: [quote]{$UserReason}[/quote] If you would like to discuss this, please join ".BOT_DISABLED_CHAN.' on our IRC network. Instructions can be found [url='.site_url().'wiki.php?action=article&name=IRC+-+How+to+join]here[/url].');
   }
 }
 

sections/user/user.php

       i.DisableWiki,
       i.DisablePM,
       i.DisableNips,
+      i.DisablePromotion,
       i.DisableIRC,
       i.DisableRequests," . "
       m.FLTokens,
     header("Location: log.php?search=User+$UserID");
   }
 
-  list($Username,  $Email,  $LastAccess, $IP, $Class, $Uploaded, $Downloaded, $RequiredRatio, $CustomTitle, $torrent_pass, $Enabled, $Paranoia, $Invites, $DisableLeech, $Visible, $BonusPoints, $JoinDate, $Info, $Avatar, $AdminComment, $Donor, $Artist, $Warned, $SupportFor, $RestrictedForums, $PermittedForums, $InviterID, $InviterName, $ForumPosts, $RatioWatchEnds, $RatioWatchDownload, $DisableAvatar, $DisableInvites, $DisablePosting, $DisableForums, $DisableTagging, $DisableUpload, $DisableWiki, $DisablePM, $DisableNips, $DisableIRC, $DisableRequests, $FLTokens, $CommentHash, $InfoTitle, $LockedAccount) = $DB->next_record(MYSQLI_NUM, array(8, 11));
+  list($Username, $Email, $LastAccess, $IP, $Class, $Uploaded, $Downloaded, $RequiredRatio, $CustomTitle, $torrent_pass, $Enabled, $Paranoia, $Invites, $DisableLeech, $Visible, $BonusPoints, $JoinDate, $Info, $Avatar, $AdminComment, $Donor, $Artist, $Warned, $SupportFor, $RestrictedForums, $PermittedForums, $InviterID, $InviterName, $ForumPosts, $RatioWatchEnds, $RatioWatchDownload, $DisableAvatar, $DisableInvites, $DisablePosting, $DisableForums, $DisableTagging, $DisableUpload, $DisableWiki, $DisablePM, $DisableNips, $DisablePromotion, $DisableIRC, $DisableRequests, $FLTokens, $CommentHash, $InfoTitle, $LockedAccount) = $DB->next_record(MYSQLI_NUM, array(8, 11));
 } else { // Person viewing is a normal user
   $DB->query("
     SELECT
           <br /><br />
 
           <input type="checkbox" name="DisableTagging" id="DisableTagging"<? if ($DisableTagging == 1) { ?> checked="checked"<? } ?> /> <label for="DisableTagging" class="tooltip" title="This only disables a user's ability to delete tags.">Tagging</label> |
-          <input type="checkbox" name="DisableWiki" id="DisableWiki"<? if ($DisableWiki == 1) { ?> checked="checked"<? } ?> /> <label for="DisableWiki">Wiki</label>
-          <br /><br />
-
+          <input type="checkbox" name="DisableWiki" id="DisableWiki"<? if ($DisableWiki == 1) { ?> checked="checked"<? } ?> /> <label for="DisableWiki">Wiki</label> |
+          <input type="checkbox" name="DisablePromotion" id="DisablePromotion"<? if ($DisablePromotion == 1) { ?> checked="checked"<? } ?> /> <label for="DisablePromotion">Promotions</label> |
           <input type="checkbox" name="DisableInvites" id="DisableInvites"<? if ($DisableInvites == 1) { ?> checked="checked"<? } ?> /> <label for="DisableInvites">Invites</label>
         </td>
       </tr>