From mboxrd@z Thu Jan 1 00:00:00 1970 From: Baoqiu Cui Subject: [PATCH] Avoid warning of free variable `old' Date: Thu, 13 May 2010 12:18:32 -0700 Message-ID: Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from [140.186.70.92] (port=53004 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OCdvq-0008DQ-0o for emacs-orgmode@gnu.org; Thu, 13 May 2010 15:18:55 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1OCdvo-0002Tx-Ug for emacs-orgmode@gnu.org; Thu, 13 May 2010 15:18:53 -0400 Received: from lo.gmane.org ([80.91.229.12]:57713) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OCdvo-0002Tf-Om for emacs-orgmode@gnu.org; Thu, 13 May 2010 15:18:52 -0400 Received: from list by lo.gmane.org with local (Exim 4.69) (envelope-from ) id 1OCdvk-0004nv-NJ for emacs-orgmode@gnu.org; Thu, 13 May 2010 21:18:48 +0200 Received: from nat-dip6.cfw-a-gci.corp.yahoo.com ([209.131.62.115]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Thu, 13 May 2010 21:18:48 +0200 Received: from cbaoqiu by nat-dip6.cfw-a-gci.corp.yahoo.com with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Thu, 13 May 2010 21:18:48 +0200 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org --=-=-= Hi Carsten, Here is a small patch to remove the warning of a free variable `old' in org.el. Just noticed that today. --=-=-= Content-Type: text/x-patch Content-Disposition: inline; filename=org-warning.diff diff --git a/lisp/org.el b/lisp/org.el index 06daa9c..0da5ba3 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -15552,7 +15552,7 @@ BEG and END default to the buffer boundaries." (let ((re (concat "\\[\\[\\(\\(file:\\)\\|\\([./~]\\)\\)\\([-+~./_0-9a-zA-Z]+" (substring (org-image-file-name-regexp) 0 -2) "\\)\\]" (if include-linked "" "\\]"))) - file ov img) + old file ov img) (while (re-search-forward re end t) (setq old (get-char-property-and-overlay (match-beginning 1) 'org-image-overlay)) --=-=-= Thanks, -- Baoqiu --=-=-= Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ Emacs-orgmode mailing list Please use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode --=-=-=--