home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #3 / NN_1993_3.iso / spool / gnu / gnusenet / config / 24 < prev    next >
Encoding:
Text File  |  1993-01-25  |  3.7 KB  |  97 lines
  1. Xref: sparky gnu.gnusenet.config:24 news.admin.misc:1204
  2. Path: sparky!uunet!spool.mu.edu!yale.edu!yale!mintaka.lcs.mit.edu!micro-heart-of-gold.mit.edu!uw-beaver!newsfeed.rice.edu!hsdndev!news.cs.umb.edu!betsys
  3. From: betsys@cs.umb.edu (Elizabeth Schwartz)
  4. Newsgroups: gnu.gnusenet.config,news.admin.misc
  5. Subject: Re: Should 'gnu' be a valid distribution?
  6. Message-ID: <BETSYS.93Jan25181359@ra.cs.umb.edu>
  7. Date: 25 Jan 93 23:13:59 GMT
  8. References: <1jsai5INN18f@slab.mtholyoke.edu>
  9. Sender: news@cs.umb.edu (USENET News System)
  10. Organization: University of Massachusetts at Boston
  11. Lines: 82
  12. In-Reply-To: jbotz@mtholyoke.edu's message of 23 Jan 93 20: 41:41 GMT
  13. Nntp-Posting-Host: ra.cs.umb.edu
  14.  
  15. Gnu's newsreader will select a default distribution that matches the 
  16. top-level group hierarchy. I asked about this here a few weeks ago,
  17. and then asked on  gnu.emacs.gnus, and got the following patch.
  18.    This is probably rampant in gnu newsgroup because of the high
  19. percentage of posters using gnus. I include the entire patch
  20. here because it is small:
  21. -------------
  22.  
  23. From dsg@blackbird.mitre.org Fri Jan 15 16:36:49 1993
  24. To: betsys@cs.umb.edu (Elizabeth Schwartz)
  25. Subject: Re: Help changing default distributions.
  26. Date: Thu, 14 Jan 93 09:22:47 EST
  27. From: Dave Goldberg <dsg@blackbird.mitre.org>
  28.  
  29.  
  30. This patch was posted to the one of the gnu.emacs.* groups a while
  31. back (by, I think, sdb@ssr.com (Scott Ballantyne)).  It prompts for a
  32. distribution, happily leaving it blank (I think most posting software
  33. defaults this to world) if nothing is given.
  34. [...]
  35.  
  36. -=============== PATCH FOR 3.14 ================-
  37. diff -c orig/gnuspost.el new/gnuspost.el
  38. *** orig/gnuspost.el    Sat May 18 10:30:43 1991
  39. --- new/gnuspost.el    Fri Feb 28 16:29:55 1992
  40. ***************
  41. *** 32,37 ****
  42. --- 32,44 ----
  43.   (autoload 'news-reply-mode "rnewspost")
  44.   (autoload 'timezone-make-date-arpa-standard "timezone")
  45.   
  46. + ;; Adjust this list for your local distributions. These are ok for the
  47. + ;; usa, local areas might want to add their own (like nj, ny, ne, ca, etc).
  48. + 
  49. + (defvar gnus-distributions-assoc
  50. +   '(("world" 1) ("na" 2) ("usa" 3) ("local" 4))
  51. +   "*Valid distributions for your location")
  52. +     
  53.   ;;; Post news commands of GNUS Group Mode and Subject Mode
  54.   
  55.   (defun gnus-Group-post-news ()
  56. ***************
  57. *** 171,187 ****
  58.                          newsgroups ;Default newsgroup.
  59.                          )))
  60.           (setq subject (read-string "Subject: "))
  61. !         (setq distribution
  62. !               (substring newsgroups 0 (string-match "\\." newsgroups)))
  63. !         (if (string-equal distribution newsgroups)
  64. !             ;; Newsgroup may be general or control. In this
  65. !             ;; case, use default distribution.
  66. !             (setq distribution gnus-default-distribution))
  67.           (setq distribution
  68. !               (read-string "Distribution: " distribution))
  69. !         ;; An empty string is ok to ignore gnus-default-distribution.
  70. !         ;;(if (string-equal distribution "")
  71. !         ;;    (setq distribution nil))
  72.           ))
  73.         (news-setup () subject () newsgroups artbuf)
  74.         ;; Make sure the article is posted by GNUS.
  75. --- 178,189 ----
  76.                          newsgroups ;Default newsgroup.
  77.                          )))
  78.           (setq subject (read-string "Subject: "))
  79. !         ;; Bug fix by sdb%hotmomma@uunet.uu.net
  80. !         ;; Don't set distribution field to heirarchy name.
  81. !         ;; prevents much flames and mail.
  82.           (setq distribution
  83. !               (completing-read "Distribution: " gnus-distributions-assoc
  84. !                        nil nil))
  85.           ))
  86.         (news-setup () subject () newsgroups artbuf)
  87.         ;; Make sure the article is posted by GNUS.
  88.  
  89.  
  90.  
  91.  
  92. --
  93. System Administrator                  Internet: betsys@cs.umb.edu
  94. MACS Dept, UMass/Boston               Phone   : 617-287-6448
  95. 100 Morrissey Blvd                    Staccato signals
  96. Boston, MA 02125-3393                      of constant information....
  97.