From 9411eb44c466e04b7fc050727c4b2271c6d03921 Mon Sep 17 00:00:00 2001 From: Leif Andersen Date: Fri, 5 Feb 2016 21:54:15 -0500 Subject: [PATCH] Add with-* to the set of lambda like expressions. --- gui-lib/framework/private/main.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gui-lib/framework/private/main.rkt b/gui-lib/framework/private/main.rkt index 021108de..8f6a2915 100644 --- a/gui-lib/framework/private/main.rkt +++ b/gui-lib/framework/private/main.rkt @@ -451,7 +451,7 @@ type-case)) (preferences:set-default 'framework:tabify - (list defaults-ht #rx"^begin" #rx"^def" #rx"^for\\*?(/|$)" #f) + (list defaults-ht #rx"^begin" #rx"^def" #rx"^(for\\*?(/|$)|with-)" #f) (list/c (hash/c symbol? (or/c 'for/fold 'define 'begin 'lambda) #:flat? #t) (or/c #f regexp?) (or/c #f regexp?) (or/c #f regexp?) (or/c #f regexp?)))