gnus-summary-save-in-folder ?

gnus-summary-save-in-folder ?

[Randy Sims]

(gnus-extended-version)
"Quassia Gnus v0.17/XEmacs 20.3 - \"Vatican City\""

Somewhere along the line, I lost any reasonable completion for folders in 

	gnus-summary-save-in-folder 
	"Append the current article to an mh folder ..."

where

	gnus-read-save-file-name 

is being used to generate the folder.

I hacked gnus-mh.el for a quick fix. Perhaps, someone can suggest
actually what the right thing is to do!

$ diff -c gnus-mh.el.save gnus-mh.el
*** gnus-mh.el.save	Thu Dec  4 17:22:02 1997
--- gnus-mh.el	Thu Dec  4 17:49:16 1997
***************
*** 36,41 ****
--- 36,42 ----
  (require 'gnus)
  (require 'mh-e)
  (require 'mh-comp)
+ (require 'mh-utils)
  (require 'gnus-msg)
  (require 'gnus-sum)
  
***************
*** 55,64 ****
    ;; Thanks to yuki@flab.Fujitsu.JUNET and ohm@kaba.junet.
    (mh-find-path)
    (let ((folder
! 	 (gnus-read-save-file-name
! 		  "Save %s in file:" folder
! 		  gnus-folder-save-name gnus-newsgroup-name
! 		  gnus-current-headers 'gnus-newsgroup-last-folder))
  	(errbuf (get-buffer-create " *Gnus rcvstore*"))
  	;; Find the rcvstore program.
  	(exec-path (if mh-lib (cons mh-lib exec-path) exec-path)))
--- 56,77 ----
    ;; Thanks to yuki@flab.Fujitsu.JUNET and ohm@kaba.junet.
    (mh-find-path)
    (let ((folder
! 	 ;;(gnus-read-save-file-name
! 	 ;;	  "Save %s in file:" folder
! 	 ;;        gnus-folder-save-name gnus-newsgroup-name
! 	 ;;        gnus-current-headers 'gnus-newsgroup-last-folder)
! 	 (mh-prompt-for-folder 
! 	  (format "Save %s in"
! 		  (if (and gnus-number-of-articles-to-be-saved
! 			   (> gnus-number-of-articles-to-be-saved 1))
! 		      (format "these %d articles"
! 			      gnus-number-of-articles-to-be-saved)
! 		    "this article"))
! 	  (funcall gnus-folder-save-name
! 		   gnus-newsgroup-name
! 		   gnus-current-headers
! 		   gnus-newsgroup-last-folder)
! 	  nil))
  	(errbuf (get-buffer-create " *Gnus rcvstore*"))
  	;; Find the rcvstore program.
  	(exec-path (if mh-lib (cons mh-lib exec-path) exec-path)))

-- 
Randal N. Sims (Randy)           |  Tel:   (803)725-1387
Westinghouse Savannah River Co.  |  Fax:   (803)725-2823
SRS, 773-A, A1128, Rm. 2         |  Email: randal.sims@srs.gov
Aiken, SC 29808-0001 USA         |  URL:   "under construction"

DISCLAIMER: The opinions expressed are mine and do not necessarily
	    represent Westinghouse Savannah River Co. or the
	    United States Department of Energy.

Re: gnus-summary-save-in-folder ?

[Jason R Mastaler]

Randy Sims <Private_User@srs.gov> writes:

> (gnus-extended-version)
> "Quassia Gnus v0.17/XEmacs 20.3 - \"Vatican City\""
> 
> Somewhere along the line, I lost any reasonable completion for folders in 
> 
> 	gnus-summary-save-in-folder 
> 	"Append the current article to an mh folder ..."
> 
> where
> 
> 	gnus-read-save-file-name 
> 
> is being used to generate the folder.
> 
> I hacked gnus-mh.el for a quick fix. Perhaps, someone can suggest
> actually what the right thing is to do!

I reported this to Lars already, and it should be fixed in QG v0.18.