--- TUNABLES
+++ TUNABLES
@@ -172,3 +172,9 @@
    If this file exists, subscription to the digest version of the mailinglist
    will be denied. (Usefull if you dont want to allow digests and notify users 
    about it).
+   
+  � nonomailsub			(boolean)
+
+   If this file exists, subscription to the nomail version of the mailinglist
+   will be denied. (Usefull if you dont want to allow nomail and notify users 
+   about it).  
--- listtexts/Makefile.am
+++ listtexts/Makefile.am
@@ -3,7 +3,7 @@
 dist_textlib_DATA = access bounce-probe listhelp listfaq moderation notifysub \
 	notifysub-digest notifysub-nomail notifyunsub notifyunsub-digest \
 	notifyunsub-nomail notintocc sub-confirm sub-confirm-digest \
-	sub-confirm-nomail sub-ok sub-ok-digest sub-ok-nomail sub-deny-digest subonlypost \
+	sub-confirm-nomail sub-ok sub-ok-digest sub-ok-nomail sub-deny-digest sub-deny-nomail subonlypost \
 	unsub-confirm unsub-confirm-digest unsub-confirm-nomail unsub-ok \
 	unsub-ok-digest unsub-ok-nomail listsubs sub-subscribed \
 	unsub-notsubscribed digest submod-moderator submod-requester
--- listtexts/Makefile.in
+++ listtexts/Makefile.in
@@ -108,7 +108,7 @@
 dist_textlib_DATA = access bounce-probe listhelp listfaq moderation notifysub \
 	notifysub-digest notifysub-nomail notifyunsub notifyunsub-digest \
 	notifyunsub-nomail notintocc sub-confirm sub-confirm-digest \
-	sub-confirm-nomail sub-ok sub-ok-digest sub-ok-nomail sub-deny-digest subonlypost \
+	sub-confirm-nomail sub-ok sub-ok-digest sub-ok-nomail sub-deny-digest sub-deny-nomail subonlypost \
 	unsub-confirm unsub-confirm-digest unsub-confirm-nomail unsub-ok \
 	unsub-ok-digest unsub-ok-nomail listsubs sub-subscribed \
 	unsub-notsubscribed digest submod-moderator submod-requester
--- listtexts/sub-deny-nomail
+++ listtexts/sub-deny-nomail
@@ -0,0 +1,9 @@
+Subject: Denied subscription to the nomail version of $listaddr$
+
+Your request to subscribe to the nomail version of the mailinglist
+
+$listaddr$
+
+has been denied. The nomail version is turned off for this
+mailinglist.
+
--- src/listcontrol.c
+++ src/listcontrol.c
@@ -242,6 +242,13 @@
 				" Ignoring mail");
 			return -1;
 		}
+                if (statctrl(listdir, "nonomailsub")) {
+                        errno = 0;
+                        log_error(LOG_ARGS,  "A subcribe-nomail request was denied");
+                               send_help(listdir, fromemails->emaillist[0],
+                                               mlmmjsend, "nonomail", "sub-deny-nomail");
+                        return -1;
+                }
 		log_oper(listdir, OPLOGFNAME, "mlmmj-sub: request for nomail"
 					" subscription from %s",
 					fromemails->emaillist[0]);


