From mboxrd@z Thu Jan 1 00:00:00 1970 From: Kaushal Modi Subject: Re: Failure in compiling org-capture.el Date: Mon, 17 Apr 2017 15:10:54 +0000 Message-ID: References: Mime-Version: 1.0 Content-Type: multipart/alternative; boundary=f403045ec682353370054d5e338d Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:55530) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1d08J2-0001gZ-1C for emacs-orgmode@gnu.org; Mon, 17 Apr 2017 11:11:08 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1d08J1-0007qG-4J for emacs-orgmode@gnu.org; Mon, 17 Apr 2017 11:11:07 -0400 Received: from mail-lf0-x22d.google.com ([2a00:1450:4010:c07::22d]:34904) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1d08J0-0007pd-SQ for emacs-orgmode@gnu.org; Mon, 17 Apr 2017 11:11:07 -0400 Received: by mail-lf0-x22d.google.com with SMTP id 75so66608659lfs.2 for ; Mon, 17 Apr 2017 08:11:06 -0700 (PDT) In-Reply-To: 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" To: emacs-org list --f403045ec682353370054d5e338d Content-Type: text/plain; charset=UTF-8 This patch works: >From 5edec74298a0140c5ebf55e7be0d64de6c702b17 Mon Sep 17 00:00:00 2001 From: Kaushal Modi Date: Mon, 17 Apr 2017 11:01:28 -0400 Subject: [PATCH] Fix nil case in pcase * lisp/org-capture.el (org-capture-fill-template): Use `nil for the nil case in pcase form. --- lisp/org-capture.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/org-capture.el b/lisp/org-capture.el index 76cacdda764..cd67c280392 100644 --- a/lisp/org-capture.el +++ b/lisp/org-capture.el @@ -1782,7 +1782,7 @@ The template may still contain \"%?\" for cursor positioning." (lambda (s) (org-insert-link 0 s)))) (first-value (car org-capture--clipboards))) (pcase (length org-capture--clipboards) - (nil nil) + (`nil nil) (`(,value) (funcall insert-fun value)) (`(,first-value . ,_) (funcall insert-fun -- 2.11.0 > -- Kaushal Modi --f403045ec682353370054d5e338d Content-Type: text/html; charset=UTF-8 Content-Transfer-Encoding: quoted-printable
This patch works:

From 5edec74298a= 0140c5ebf55e7be0d64de6c702b17 Mon Sep 17 00:00:00 2001
From: Kaus= hal Modi <kaushal.modi@gmail.c= om>
Date: Mon, 17 Apr 2017 11:01:28 -0400
Subjec= t: [PATCH] Fix nil case in pcase

* lisp/org-captur= e.el (org-capture-fill-template): Use `nil for the
=C2=A0 nil cas= e in pcase form.
---
=C2=A0lisp/org-capture.el | 2 +-
=C2=A01 file changed, 1 insertion(+), 1 deletion(-)

=
diff --git a/lisp/org-capture.el b/lisp/org-capture.el
index 76cacdda764..cd67c280392 100644
--- a/lisp/org-capture.el<= /div>
+++ b/lisp/org-capture.el
@@ -1782,7 +1782,7 @@ The tem= plate may still contain \"%?\" for cursor positioning."
=C2=A0 <= /span> (lambda (s) (org-insert-link 0 s))))
=C2=A0 =C2=A0 (first-value (c= ar org-capture--clipboards)))
=C2=A0 =C2=A0 =C2=A0 =C2=A0 (pcase (length o= rg-capture--clipboards)
- (nil nil)
+ (`nil nil)
=C2=A0 (`(,value) (f= uncall insert-fun value))
=C2=A0 (`(,first-value . ,_)
=C2=A0 =C2=A0(fu= ncall insert-fun
--=C2=A0
2.11.0
--

Kaushal Modi

--f403045ec682353370054d5e338d--