Improved caption demo script a bit.
authorGuo Rui <firemeteor@Adam.(none)>
Tue, 21 Jul 2009 16:30:57 +0000 (22 00:30 +0800)
committerGuo Rui <firemeteor@Adam.(none)>
Tue, 21 Jul 2009 16:30:57 +0000 (22 00:30 +0800)
Issues remain:
1. hard to iterate through windows
2. Error in caption handler causes stack-overflow.

src/scripts/caption.lua

index c5ba970..f25f8c8 100644 (file)
@@ -4,11 +4,11 @@ function captionprocess (canvas)
 
   caption = " "
   for i, w in ipairs(windows) do
-    if w == canvas.window then
-      caption = caption .. "%{= b}"
-    end
-    caption = caption .. string.format("%d: %s", w.number, w.title)
-    caption = caption .. " "
+    t = string.format("%d: %s", w.number, w.title)
+   if w == canvas.window then
+     t = string.format("%%{= wb}%s%%{= wk}", t)
+   end
+    caption = caption .. t .. " "
   end
 
   canvas.caption = caption