From: Lars Magne Ingebrigtsen Date: Tue, 5 Oct 2010 18:39:53 +0000 (+0200) Subject: (shr-insert-table): Bind free variable. X-Git-Url: http://cgit.sxemacs.org/?p=gnus;a=commitdiff_plain;h=7ad80d3719e53fc5e4c2c337c84f91c08ff7a2d1 (shr-insert-table): Bind free variable. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 86a155494..00bfaac1d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2010-10-05 Lars Magne Ingebrigtsen + * shr.el (shr-insert-table): Bind free variable. + * mm-decode.el (mm-shr): Bind shr-content-function. * shr.el (shr-content-function): New variable. diff --git a/lisp/shr.el b/lisp/shr.el index fe228135c..9318740af 100644 --- a/lisp/shr.el +++ b/lisp/shr.el @@ -460,7 +460,7 @@ Return a string with image data." (goto-char start) (let ((lines (split-string (nth 2 column) "\n")) (overlay-lines (nth 3 column)) - overlay) + overlay overlay-line) (dolist (line lines) (setq overlay-line (pop overlay-lines)) (when (> (length line) 0)