home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #19 / NN_1992_19.iso / spool / bit / listserv / jnetl / 109 < prev    next >
Encoding:
Text File  |  1992-09-03  |  1.9 KB  |  50 lines
  1. Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
  2. Path: sparky!uunet!uvaarpa!darwin.sura.net!paladin.american.edu!auvm!SELIUC51.BITNET!B_KLEVE
  3. Original_To:  JNET%"jnet-l@finhutc"
  4. Message-ID: <JNET-L%92090318050177@FINHUTC.HUT.FI>
  5. Newsgroups: bit.listserv.jnet-l
  6. Date:         Thu, 3 Sep 1992 17:01:00 +0200
  7. Sender:       BITNIC JNET-L List <JNET-L@UGA.BITNET>
  8. From:         "Bo Kleve (Linkoping Univ CC)" <B_KLEVE@SELIUC51.BITNET>
  9. Subject:      Re: problem with jan_receive area and quotas
  10. Lines: 38
  11.  
  12. Having read all the different ideas of how to prevent users misusing
  13. the receive area, I haven't seen anyone suggesting a modification of
  14. MFSDISP (or was it mentioned?). From what I remember when this was a
  15. topic in 1987 that was the way to go. We had these problems ourselfs
  16. with users trying to get more space and the system disk filling up.
  17.  
  18. A simple addition to the MFSDISP.FOR and running BUILD_MFSDISP.COM
  19. and this problem is solved. This will even solve the problem of users
  20. trying to cooperate on the same node. I guess they will start helping
  21. each other using different nodes next...
  22.  
  23. What the addition does is to check if the sending and receiving node
  24. is the same. If so, the file is sent as mail.
  25.  
  26. !       Let's send files from local user to local user as mail  /BoK 870731
  27.         ! Check to see if we consider it mail
  28.         ELSEIF (.NOT. VMSDUMP .AND.
  29.         1      (CLASS .EQ. 'M' .or.
  30.         2       TYPE .EQ. 'NOTE' .or.
  31.         3       TYPE .EQ. 'MAIL' .or.
  32.         4       FROM_NODE .EQ. TO_NODE )) THEN
  33.           RECEIVE = .FALSE.
  34.           NOTIFY = .FALSE.
  35.           FILE = 'JAN_SYS:JMAILER.TXT'
  36.           WAKE = 'Mail_Daemon'
  37.           STAMP = .TRUE.
  38.  
  39.  
  40. All the code except for "FROM-NODE .EQ. TO_NODE" is in the file
  41. as delivered from Joiner. So one line is enough to "fix" it.
  42. At least it has helped us.
  43.  
  44. /BoK
  45.  
  46. Bo Kleve
  47. Linkoping Univ CC, Sweden
  48.  
  49. B_KLEVE@SELIUC51 or BoK@LIDAC.LiU.SE
  50.