From mboxrd@z Thu Jan 1 00:00:00 1970 From: taylanbayirli@gmail.com ("Taylan Ulrich =?utf-8?Q?Bay=C4=B1rl=C4=B1?= =?utf-8?Q?=2FKammer=22?=) Subject: [PATCH] Set Emacs indentation for `wrap-program'. Date: Sat, 31 Jan 2015 21:54:17 +0100 Message-ID: <87vbjmr7ra.fsf@taylan.uni.cx> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: 8bit Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:43977) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1YHf3l-0007UG-1W for guix-devel@gnu.org; Sat, 31 Jan 2015 15:54:29 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1YHf3e-0006JC-Dg for guix-devel@gnu.org; Sat, 31 Jan 2015 15:54:28 -0500 Received: from mail-we0-x229.google.com ([2a00:1450:400c:c03::229]:36199) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1YHf3e-0006Iu-66 for guix-devel@gnu.org; Sat, 31 Jan 2015 15:54:22 -0500 Received: by mail-we0-f169.google.com with SMTP id u56so32714545wes.0 for ; Sat, 31 Jan 2015 12:54:20 -0800 (PST) Received: from taylan.uni.cx (p200300514A46341E0213E8FFFEED36FB.dip0.t-ipconnect.de. [2003:51:4a46:341e:213:e8ff:feed:36fb]) by mx.google.com with ESMTPSA id n3sm11991429wjq.30.2015.01.31.12.54.19 for (version=TLSv1.2 cipher=RC4-SHA bits=128/128); Sat, 31 Jan 2015 12:54:19 -0800 (PST) List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org To: guix-devel@gnu.org ===File /home/tub/media/src/guix/0001-Set-Emacs-indentation-for-wrap-program.patch=== >From f7f3ce7140c82380e68ba3299ac17555268b8155 Mon Sep 17 00:00:00 2001 From: Taylan Ulrich B Date: Sat, 29 Nov 2014 13:36:24 +0100 Subject: [PATCH 1/2] Set Emacs indentation for `wrap-program'. * .dir-locals.el (scheme-mode): Set `scheme-indent-function' of `wrap-program' to 1. --- .dir-locals.el | 1 + 1 file changed, 1 insertion(+) diff --git a/.dir-locals.el b/.dir-locals.el index b82d049..1d4c7d1 100644 --- a/.dir-locals.el +++ b/.dir-locals.el @@ -52,6 +52,7 @@ (eval . (put 'mlet 'scheme-indent-function 2)) (eval . (put 'run-with-store 'scheme-indent-function 1)) (eval . (put 'run-with-state 'scheme-indent-function 1)) + (eval . (put 'wrap-program 'scheme-indent-function 1)) ;; Recognize '~', '+', and '$', as used for gexps, as quotation symbols. ;; This notably allows '(' in Paredit to not insert a space when the -- 2.2.1 ============================================================