From 216917c4b636e9b786dcdf0a77a182454d2c483c Mon Sep 17 00:00:00 2001
From: Sam Liddicott <sam@liddicott.com>
Date: Fri, 18 May 2012 18:37:40 +0100
Subject: [PATCH] WIP

---
 fangle.ts | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/fangle.ts b/fangle.ts
index c011401..26fff3c 100644
--- a/fangle.ts
+++ b/fangle.ts
@@ -416,7 +416,11 @@
     </src-comment>
   </active*>
 
-  <assign|nf-chunk-id|<macro|name|tag|n|<merge|code-|<arg|tag>|-|<unquote|<arg|name>>|-|<arg|n>>>>
+  <assign|nf-base|<macro|x|<if|<provides|fake-page-base-name>|<merge|<value|fake-page-base-name>|-|<arg|x>>|<arg|x>>>>
+
+  <assign|zog|<xmacro|x|<quasi|<if|<and|<provides|fake-page-base-name>|<greater|<length|<value|fake-page-base-name>>|0>>|<merge|<value|fake-page-base-name>|-|<unquote*|<quote-arg|x>>>|<merge|<unquote*|<quote-arg|x>>>>>>>
+
+  <assign|nf-chunk-id|<macro|name|tag|n|<merge|<nf-base|code->|<arg|tag>|-|<unquote|<arg|name>>|-|<arg|n>>>>
 
   <\active*>
     <\src-comment>
-- 
2.11.4.GIT