[Date Prev][Date Next][Thread Prev][][Date Index][Thread Index]

Re: emacs-w3m cannot quit from a w3m-session



Katsumi Yamaoka <yamaoka@xxxxxxx> writes:

> --- w3m.el~	2007-12-03 22:17:55 +0000
> +++ w3m.el	2007-12-06 04:42:18 +0000
> @@ -2635,11 +2635,15 @@
>  If SOFT is non-nil, use `intern-soft' insted."
>    (let ((fn (if soft 'intern-soft 'intern))
>  	(str (if (consp url)
> -		 `(let ((url ,url))
> -		    (if (eq (aref url (1- (length url))) ?/)
> +		 `(let* ((url ,url)
> +			 (len (length url)))
> +		    (if (and (not (zerop len))
> +			     (eq (aref url (1- len)) ?/))
>  			(substring url 0 -1)
>  		      url))
> -	       `(if (eq (aref ,url (1- (length ,url))) ?/)
> +	       `(if (let ((len (length ,url)))
> +		      (and (not (zerop len))
> +			   (eq (aref ,url (1- len)) ?/)))
>  		    (substring ,url 0 -1)
>  		  ,url))))
>      `(,fn ,str w3m-arrived-db)))

3か月ほど前のものへの返信ですが、このパッチは commit されないのでしょうか?
w3m-input-url で空文字でも補完できるようになるので入れたほうがいいように
思います。

--
青田