Gnus development mailing list
 help / color / mirror / Atom feed
From: Wes Hardaker <wjhardaker@ucdavis.edu>
Cc: Wes Hardaker <wjhardaker@ucdavis.edu>, ding@gnus.org
Subject: Re: mime/w3/html/images/agent support
Date: 18 Sep 1998 11:04:17 -700	[thread overview]
Message-ID: <x7n27xs3fi.fsf@des.castles.com> (raw)
In-Reply-To: wmperry@aventail.com's message of "18 Sep 1998 12:46:18 -0500"

>>>>> On 18 Sep 1998 12:46:18 -0500, wmperry@aventail.com (William M. Perry) said:

William> That's what url-standalone-mode controls.  If that is
William> non-nil, then it will not do any network traffic - it will
William> just pull stuff from the cache.

OOOOHHHHHhhhh....

I didn't realize that was a real variable...  Sorry...

Lars?  The following completely-untested (ha ha) patch should do the trick:

*** /users/hardaker/tmp/mm-view.el      Fri Sep 18 11:03:06 1998
--- /users/hardaker/pgnus/lisp/mm-view.el       Mon Sep 14 14:16:00 1998
***************
*** 71,87 ****
                 ,(set-marker (make-marker) (point-max)))))))))
       ((equal type "html")
        (save-excursion
!       (let ((url-standalone-mode (not gnus-plugged)))
!         (w3-do-setup)
!         (mm-with-unibyte-buffer
!           (insert-buffer-substring (mm-handle-buffer handle))
!           (mm-decode-content-transfer-encoding (mm-handle-encoding handle))
!           (require 'url)
!           (save-window-excursion
!             (w3-region (point-min) (point-max))
!             (setq text (buffer-string))))
!         (mm-insert-inline handle text))))
!       ((or (equal type "enriched")
          (equal type "richtext"))
        (save-excursion
        (mm-with-unibyte-buffer
--- 71,86 ----
                 ,(set-marker (make-marker) (point-max)))))))))
       ((equal type "html")
        (save-excursion
!       (w3-do-setup)
!       (mm-with-unibyte-buffer
!         (insert-buffer-substring (mm-handle-buffer handle))
!         (mm-decode-content-transfer-encoding (mm-handle-encoding handle))
!         (require 'url)
!         (save-window-excursion
!           (w3-region (point-min) (point-max))
!           (setq text (buffer-string))))
!       (mm-insert-inline handle text)))
!      ((or (equal type "enriched")
          (equal type "richtext"))
        (save-excursion
        (mm-with-unibyte-buffer


-- 
"Ninjas aren't dangerous.  They're more afraid of you than you are of them."


  reply	other threads:[~1998-09-18 18:04 UTC|newest]

Thread overview: 6+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1998-09-18 16:03 Wes Hardaker
1998-09-18 17:28 ` William M. Perry
1998-09-18 17:41   ` Wes Hardaker
1998-09-18 17:46     ` William M. Perry
1998-09-18 18:04       ` Wes Hardaker [this message]
1998-09-19 20:51         ` Lars Magne Ingebrigtsen

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=x7n27xs3fi.fsf@des.castles.com \
    --to=wjhardaker@ucdavis.edu \
    --cc=ding@gnus.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).