From: Tatsuya Kinoshita <t...@vega.ocn.ne.jp> said Subject: [emacs-w3m:10980] Re: Bug#537327: w3m-el can't render http://www.crummy.com/software/BeautifulSoup/documentation.html Message-ID: <20090803.204534.59000234.tats%nob...@tats.iris.ne.jp> Date: Mon, 03 Aug 2009 20:45:34 +0900 (JST)
> Hi emacs-w3m developers, > > This bug is forwarded from Debian bug tracking system: > http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=537327 > > (If possible, please preserve 457...@bugs.debian.org in replies.) > > On July 17, 2009 at 12:56PM +1000, > trentbuck (at gmail.com) wrote: > >> Package: w3m-el-snapshot >> Version: 1.4.344+0.20090405-1 >> Severity: normal >> >> This URL works in w3m but not in w3m-el: >> >> http://www.crummy.com/software/BeautifulSoup/documentation.html >> >> To reproduce this: >> >> emacs -Q -l /etc/emacs/site-start.d/50w3m-el-snapshot.el --eval >> '(w3m-browse-url >> "http://www.crummy.com/software/BeautifulSoup/documentation.html")' >> >> The contents of *Messages* is >> >> ("emacs" "-Q" "-l" "/etc/emacs/site-start.d/50w3m-el-snapshot.el" >> "--eval" "(w3m-browse-url >> \"http://www.crummy.com/software/BeautifulSoup/documentation.html\")") >> For information about GNU Emacs and the GNU system, type C-h C-a. >> error in process sentinel: w3m-fontify-anchors: Wrong type argument: >> number-or-marker-p, nil >> error in process sentinel: Wrong type argument: number-or-marker-p, nil Thank you for your report. I just installed this patch to CVS Head. -- Hideyuki SHIRAI (mailto:shi...@meadowy.org) Index: w3m.el =================================================================== RCS file: /cvsroot/w3m-shirai/emacs-w3m/w3m.el,v retrieving revision 1.1260 retrieving revision 1.1261 diff -u -r1.1260 -r1.1261 --- w3m.el 30 Jul 2009 00:34:06 -0000 1.1260 +++ w3m.el 4 Aug 2009 01:12:05 -0000 1.1261 @@ -3457,8 +3457,9 @@ ;; is replaced from "&" and embedded in the w3m's halfdump should be ;; restored into "&" some time. (let ((start 0) (buf)) - (while (string-match "&" str start) - (setq buf (cons "&" (cons (substring str start (match-beginning 0)) buf)) + (while (string-match "\\(&\\)\\|\\([\t\r\f\n]+\\)" str start) + (setq buf (cons (if (match-beginning 1) "&" " ") + (cons (substring str start (match-beginning 0)) buf)) start (match-end 0))) (apply (function concat) (nreverse (cons (substring str start) buf))))) -- To UNSUBSCRIBE, email to debian-bugs-dist-requ...@lists.debian.org with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org