From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Tim X Newsgroups: gmane.emacs.help Subject: Re: Emacs 21 and w3 on Debian Date: 24 May 2005 18:24:28 +1000 Message-ID: <87u0kt9glf.fsf@tiger.rapttech.com.au> References: <87sm0fbjx4.fsf@tiger.rapttech.com.au> <874qcvqar0.fsf@spamfoil.invalid> <87oeb2c2x5.fsf@tiger.rapttech.com.au> <87psvipco6.fsf@spamfoil.invalid> Reply-To: timx@spamto.devnul.com NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1116926214 1453 80.91.229.2 (24 May 2005 09:16:54 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Tue, 24 May 2005 09:16:54 +0000 (UTC) Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Tue May 24 11:16:53 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1DaVVV-0002O3-6K for geh-help-gnu-emacs@m.gmane.org; Tue, 24 May 2005 11:15:25 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1DaVZ8-0001A2-8l for geh-help-gnu-emacs@m.gmane.org; Tue, 24 May 2005 05:19:10 -0400 Original-Newsgroups: gnu.emacs.help Original-Lines: 97 User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.4 Original-NNTP-Posting-Host: ppp21-36.lns2.syd3.internode.on.net Original-X-Trace: duster.adelaide.on.net 1116923069 59.167.21.36 (24 May 2005 17:54:29 +0950) Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!postnews.google.com!news3.google.com!news.glorb.com!border1.nntp.dca.giganews.com!nntp.giganews.com!figjam.pipenetworks.com!duster.adelaide.on.net!not-for-mail Original-Xref: shelby.stanford.edu gnu.emacs.help:131489 Original-To: help-gnu-emacs@gnu.org X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:26946 X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:26946 Thierry Emery writes: > Tim X writes: > > > Well, it seems pretty much any page with a relative link which is not > > relative to the document root of the server. An example is > > > > http://www.une.edu.au/itd/index.html > > > > If you try to follow the "About ITD" link on that page, instead of > > getting > > > > http://www.une.edu.au/itd/about/index.html > > Hmm, strange, this works for me when using the same environment as you have: > > Debian GNU/Linux sid > GNU Emacs 21.4.1 (i386-pc-linux-gnu, X toolkit, Xaw3d scroll bars) > of 2005-03-17 on trouble, modified by Debian > w3-el-e21 4.0pre.2001.10.27-16 > w3-url-e21 2001.11.08-7 > > with the following procedure: > > /usr/bin/emacs -q & > M-x w3-fetch > http://www.une.edu.au/itd/index.html > > > this does get http://www.une.edu.au/itd/about/index.html ... > > > However: > > 1. Errors are signaled when loading images ("Text is read-only"), > this is solved with: > > (defadvice w3-finalize-image-download (around set-inhibit-read-only activate) > (let ((inhibit-read-only t)) > ad-do-it)) > > (defadvice widget-image-value-create (around set-inhibit-read-only activate) > (let ((inhibit-read-only t)) > ad-do-it)) > > 2. Images are not inserted where they belong, this is fixed with: > > (eval-after-load "w3-widget" (quote > (defun widget-image-value-set (widget value) > ;; Recreate widget with new value. > (save-excursion > (let* ((where (widget-get widget 'where))) > (widget-image-delete widget) > (if (or (eq 'image (car-safe value)) ; Emacs 21 > (widget-glyphp value)) > (widget-put widget 'glyph value) > (widget-put widget :value value)) > (and where > (goto-char where)) > (put-text-property (point) > (progn > (widget-apply widget :create) > (point)) > 'inaudible > widget-image-inaudible-p)))) > )) > > 3. There are ">" glitches, which are eliminated with: > > (add-hook 'w3-parse-hooks > (lambda () > (while (search-forward "/>" nil t) > (replace-match ">")))) > > > Hoping this helps, > > Thierry > -- > thierry |point| emery |chez| free |point| fr Thierry, You blow me away with all of this! I've used defadvice a bit myself to get around problems etc, but it would take me ages to work out everything that you have so quickly. You have reinspired my faith in newsgroups! thanks, Tim -- Tim Cross The e-mail address on this message is FALSE (obviously!). My real e-mail is to a company in Australia called rapttech and my login is tcross - if you really need to send mail, you should be able to work it out!