From mboxrd@z Thu Jan 1 00:00:00 1970 From: Kyle Meyer Subject: [PATCH] org-src: Fix reference to free variable Date: Sat, 23 May 2015 15:30:58 -0400 Message-ID: <878ucfozv1.fsf@kmlap.domain.org> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:51901) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1YwFAB-0003PD-Fp for emacs-orgmode@gnu.org; Sat, 23 May 2015 15:32:55 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1YwFA7-0005ln-Nf for emacs-orgmode@gnu.org; Sat, 23 May 2015 15:32:51 -0400 Received: from mail-qk0-f182.google.com ([209.85.220.182]:35485) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1YwFA7-0005lI-K4 for emacs-orgmode@gnu.org; Sat, 23 May 2015 15:32:47 -0400 Received: by qkdn188 with SMTP id n188so37444584qkd.2 for ; Sat, 23 May 2015 12:32:46 -0700 (PDT) Received: from localhost ([2601:6:5480:1e5:9e4e:36ff:fe3d:ae9c]) by mx.google.com with ESMTPSA id k20sm3709835qhk.35.2015.05.23.12.32.45 for (version=TLSv1.2 cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128); Sat, 23 May 2015 12:32:45 -0700 (PDT) List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Org-mode --=-=-= Content-Type: text/plain Hello, The attached patch fixes a void variable error that occurs when remote editing an empty footnote. (This was introduced by commit 71641bc3a08.) --=-=-= Content-Type: text/x-diff Content-Disposition: attachment; filename=0001-org-src-Fix-reference-to-free-variable.patch >From 9ba6a2f4af05c1104c678d959ff285bc7df5a70a Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Sat, 23 May 2015 15:18:07 -0400 Subject: [PATCH] org-src: Fix reference to free variable * lisp/org-src.el (org-src--contents-area): Replace a let with let*. --- lisp/org-src.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/org-src.el b/lisp/org-src.el index 5201dca..88c8dd2 100644 --- a/lisp/org-src.el +++ b/lisp/org-src.el @@ -273,10 +273,10 @@ (defun org-src--contents-area (datum) (let ((type (org-element-type datum))) (cond ((eq type 'footnote-definition) - (let ((beg (org-with-wide-buffer - (goto-char (org-element-property :post-affiliated datum)) - (search-forward "]"))) - (end (or (org-element-property :contents-end datum) beg))) + (let* ((beg (org-with-wide-buffer + (goto-char (org-element-property :post-affiliated datum)) + (search-forward "]"))) + (end (or (org-element-property :contents-end datum) beg))) (list beg end (buffer-substring-no-properties beg end)))) ((org-element-property :contents-begin datum) (list (org-element-property :contents-begin datum) -- 2.4.1 --=-=-= Content-Type: text/plain -- Kyle --=-=-=--