Pterodactyl Gnus v0.92 is released

Pterodactyl Gnus v0.92 is released

[Lars Magne Ingebrigtsen]

Bug fixes.

Get it from <URL:http://quimby.gnus.org/gnus/dist/pgnus.tar.gz>
or "/ftp@quimby.gnus.org:/pub/gnus/".  The patch is available as
<URL:ftp://quimby.gnus.org/pub/gnus/ding-patches/pgnus-0.91-0.92.diff.gz>.

ChangeLog since last release:

Tue Jul  6 10:59:24 1999  Lars Magne Ingebrigtsen  <larsi@menja.ifi.uio.no>

	* gnus.el: Pterodactyl Gnus v0.92 is released.

1999-07-06 12:30:59  Johannes Weinert  <Johannes.Weinert@Informatik.Uni-Oldenburg.DE>

	* gnus-sum.el (gnus-summary-catchup-and-exit): Doc fix. 

1999-07-06 07:41:07  Lars Magne Ingebrigtsen  <larsi@gnus.org>

	* nntp.el (nntp-retrieve-groups): Don't do anything when not
	connected. 

	* gnus-start.el (gnus-active-to-gnus-format): Only save active
	when plugged.

	* mm-view.el (mm-inline-message): Ignore remove-spec.

	* gnus-agent.el (gnus-agent-write-active): Check whether orig sym
	is bound.

	* gnus-msg.el (gnus-summary-mail-forward): Rename From_ lines. 

	* nndoc.el (nndoc-guess-type): Remove blank lines at the start. 

	* nnfolder.el (nnfolder-read-folder): Remove blank lines at the
	start. 

	* message.el (message-fill-yanked-message): Remove `t' arg.

	* gnus-group.el (gnus-group-kill-group): Message killing of
	groups. 

	* mm-util.el (mm-preferred-coding-system): New function.
	(mm-mime-charset): Use it.

	* mml.el (mml-generate-mime-1): Charset-encode message parts.

1999-07-06 07:03:31  Alexandre Oliva  <oliva@dcc.unicamp.br>

	* gnus-mlsplt.el: New file.

1999-07-06 05:47:57  Lars Magne Ingebrigtsen  <larsi@gnus.org>

	* mm-decode.el (mm-inline-Media-tests): Changed from forms to
	functions. 
	(mm-attachment-override-p): Take a handle instead of a type.
	(mm-inlined-p): Ditto.
	(mm-automatic-display-p): Ditto,
	(mm-inlinable-p): Ditto.

	* nndraft.el (nndraft-request-expire-articles): Delete backup
	files. 

	* mailcap.el (mailcap-parse-mailcap): Regexp-quote stuff.

	* gnus-sum.el (gnus-summary-limit-to-extra): Typo.

1999-07-06 05:37:46  Alexandre Oliva  <oliva@dcc.unicamp.br>

	* nnmail.el (nnmail-split-it): Allow .*.

1999-07-05 05:04:57  Lars Magne Ingebrigtsen  <larsi@gnus.org>

	* mm-decode.el (mm-inline-large-images-p): Renamed.

	* gnus-art.el (article-date-ut): Always look in the current buffer 
	for the Date header.

	* mml.el (mml-validate): New command.

	* mailcap.el (mailcap-possible-viewers): Revert to string-match
	since we are dealing with regexps.



-- 
(domestic pets only, the antidote for overdose, milk.)
   larsi@gnus.org * Lars Magne Ingebrigtsen

Re: Pterodactyl Gnus v0.92 is released

[Stainless Steel Rat]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

The current gnus-article-babel does not work with the current version of
babel.el (0.5).  This is mainly because the new version of babel.el can
call several different translation servers, not just babelfish.  The
babel-translations alist is gone, replaced by babel-languages, which has a
different structure.

Someone who is better with Gnus' innards should take a look at the new
babel, I think:

        <URL:http://www.chez.com/emarsden/downloads/babel.el>
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v0.9.8 (GNU/Linux)
Comment: For info see http://www.gnupg.org

iD8DBQE3gqQygl+vIlSVSNkRAhrZAKDKd4cOmfF9pQDBrwlqXKv4sOgYcwCgihsU
fUN+4WYuyXacTQv81xKm9+w=
=AL0d
-----END PGP SIGNATURE-----

-- 
Rat <ratinox@peorth.gweep.net>    \ Do not taunt Happy Fun Ball.
Minion of Nathan - Nathan says Hi! \ 
PGP Key: at a key server near you!  \ 

Re: Pterodactyl Gnus v0.92 is released

[Lars Magne Ingebrigtsen]

Stainless Steel Rat <ratinox@peorth.gweep.net> writes:

> The current gnus-article-babel does not work with the current version of
> babel.el (0.5).  This is mainly because the new version of babel.el can
> call several different translation servers, not just babelfish.  The
> babel-translations alist is gone, replaced by babel-languages, which has a
> different structure.
> 
> Someone who is better with Gnus' innards should take a look at the new
> babel, I think:
> 
>         <URL:http://www.chez.com/emarsden/downloads/babel.el>

Yeah.  And someone who is more familiar with babel.el.  :-)

The babel code in Gnus is very, very straightforward -- article-babel
and article-babel-prompt in gnus-art.el.

-- 
(domestic pets only, the antidote for overdose, milk.)
  larsi@gnus.org * Lars Magne Ingebrigtsen

Re: Pterodactyl Gnus v0.92 is released

[Eric Marsden]

>>>>> "larsi" == Lars Magne Ingebrigtsen <larsi@gnus.org> writes:

  ssr> Someone who is better with Gnus' innards should take a look at
  ssr> the new babel, I think:

  larsi> Yeah.  And someone who is more familiar with babel.el.  :-)
  larsi> 
  larsi> The babel code in Gnus is very, very straightforward --
  larsi> article-babel and article-babel-prompt in gnus-art.el.

ok, I will have a look at it. I am not very happy with how babel.el
handles buffers; I have to work around Emacs/w3's strange (IMO)
behaviour with buffers.

I apologize for breaking the gnus-babel functions, but modifications
were required to support multiple backends.
  
-- 
Eric Marsden, still running Gnus v5.3/Emacs 19.34

Re: Pterodactyl Gnus v0.92 is released

[Eric Marsden]

>>>>> "ecm" == Eric Marsden <emarsden@mail.dotcom.fr> writes:

  ssr> Someone who is better with Gnus' innards should take a look at
  ssr> the new babel, I think:

  larsi> Yeah.  And someone who is more familiar with babel.el.  :-)
  larsi> 
  larsi> The babel code in Gnus is very, very straightforward --
  larsi> article-babel and article-babel-prompt in gnus-art.el.

  ecm> ok, I will have a look at it.

this seems to work with XEmacs 20.4 and pgnus 0.95.

  
--- gnus-art.el-orig	Sat Jul 10 00:22:56 1999
+++ gnus-art.el	Thu Jul 29 13:37:34 1999
@@ -1529,17 +1529,9 @@
 	    (while (re-search-forward banner nil t)
 	      (delete-region (match-beginning 0) (match-end 0))))))))))
 
-(defun article-babel-prompt ()
-  "Prompt for a babel translation."
-  (require 'babel)
-  (completing-read "Translate from: "
-		   babel-translations nil t
-		   (car (car babel-translations))
-		   babel-history))
-
-(defun article-babel (translation)
-  "Translate article according to TRANSLATION using babelfish."
-  (interactive (list (article-babel-prompt)))
+(defun article-babel ()
+  "Translate article using an online translation service."
+  (interactive)
   (require 'babel)
   (save-excursion
     (set-buffer gnus-article-buffer)
@@ -1547,14 +1539,12 @@
       (let* ((buffer-read-only nil)
 	     (start (point))
 	     (end (point-max))
-	     (msg (buffer-substring start end)))
+	     (orig (buffer-substring start end))
+             (trans (babel-as-string orig)))
 	(save-restriction
 	  (narrow-to-region start end)
 	  (delete-region start end)
-	  (babel-fetch msg (cdr (assoc translation babel-translations)))
-	  (save-restriction
-	    (narrow-to-region start (point-max))
-	    (babel-wash)))))))
+          (insert trans))))))
 
 (defun article-hide-signature (&optional arg)
   "Hide the signature in the current article.