🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: gnu.emacs.gnus
Article #81485

Re: posting from gnus

#81485
From: Fran Litterio
Date: Tue, 02 Feb 1993 19:46
74 lines
3543 bytes
scott-ralph@math.yale.edu (Ralph Scott) writes:

> When posting to the net from gnus, why does gnus query the user at the
> stage of requesting "distribution" with the initial letters of the
> current newsgroup already typed into the response line?

It's a bug.  These diffs (to gnuspost.el in Gnus 3.14.1) should give
the desired functionality:

*** gnuspost.el,orig	Sat May 18 10:30:43 1991
--- gnuspost.el	Mon May 11 11:47:20 1992
***************
*** 30,39 ****
--- 30,47 ----
  (defvar gnus-winconf-post-news nil)
  
  (autoload 'news-reply-mode "rnewspost")
  (autoload 'timezone-make-date-arpa-standard "timezone")
  
+ ;; Adjust this list for your local distributions. These are ok for the
+ ;; usa, local areas might want to add their own (like nj, ny, ne, ca, etc).
+ 
+ (defvar gnus-distributions-assoc
+   '(("world" 1) ("na" 2) ("usa" 3) ("local" 4) ("ne" 5))
+   "*Valid distributions for your location")
+ 	
+ 
  ;;; Post news commands of GNUS Group Mode and Subject Mode
  
  (defun gnus-Group-post-news ()
    "Post an article."
    (interactive)
***************
*** 175,186 ****
  		      (substring newsgroups 0 (string-match "\\." newsgroups)))
  		(if (string-equal distribution newsgroups)
  		    ;; Newsgroup may be general or control. In this
  		    ;; case, use default distribution.
  		    (setq distribution gnus-default-distribution))
  		(setq distribution
! 		      (read-string "Distribution: " distribution))
  		;; An empty string is ok to ignore gnus-default-distribution.
  		;;(if (string-equal distribution "")
  		;;    (setq distribution nil))
  		))
  	  (news-setup () subject () newsgroups artbuf)
--- 183,198 ----
  		      (substring newsgroups 0 (string-match "\\." newsgroups)))
  		(if (string-equal distribution newsgroups)
  		    ;; Newsgroup may be general or control. In this
  		    ;; case, use default distribution.
  		    (setq distribution gnus-default-distribution))
+  		;; Bug fix by sdb%hotmomma@uunet.uu.net
+  		;; Don't set distribution field to heirarchy name.
+  		;; prevents much flames and mail.
  		(setq distribution
! 		      (completing-read "Distribution: " gnus-distributions-assoc
! 				       nil nil))
  		;; An empty string is ok to ignore gnus-default-distribution.
  		;;(if (string-equal distribution "")
  		;;    (setq distribution nil))
  		))
  	  (news-setup () subject () newsgroups artbuf)

> And where, in anywhere, do the
> possible responses that gnus will accept appear in the infotex
> documentation?

I don't know the answer to that.
--
franl@centerline.com         "So what we've decided to do is set you up in
uunet!centerline!franl        Cicely, situated in an area that we Alaskans
617-498-3255 (USA)            refer to as The Alaskan Riviera."
PGP 2.0 public key available.
Technical Details
Message-ID: <FRANL.93Feb2144642@draco.centerline.com>
Path: arc1-ca.pugleaf.net!sparky!uunet!ferkel.ucsb.edu!taco!gatech!darwin.sura.net!spool.mu.edu!hri.com!noc.near.net!news.centerline.com!franl
References: <1kmi3oINN3ad@FERMAT.MATH.YALE.EDU>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 1016f0,398e107f6b06166d
X-Google-Attributes: gid1016f0,public
X-Google-ArrivalTime: 1993-02-05 04:55:06 PST
Path: arc1-ca.pugleaf.net!sparky!uunet!ferkel.ucsb.edu!taco!gatech!darwin.sura.net!spool.mu.edu!hri.com!noc.near.net!news.centerline.com!franl
From: franl@centerline.com (Fran Litterio)
Newsgroups: gnu.emacs.gnus
Subject: Re: posting from gnus
Message-ID: <FRANL.93Feb2144642@draco.centerline.com>
Date: 2 Feb 93 19:46:42 GMT
References: <1kmi3oINN3ad@FERMAT.MATH.YALE.EDU>
Organization: CenterLine Software R&D
Lines: 74
NNTP-Posting-Host: 140.239.3.116
In-reply-to: scott-ralph@math.yale.edu's message of 2 Feb 93 19:30:00 GMT