Index: trunk/ippTasks/publish.pro
===================================================================
--- trunk/ippTasks/publish.pro	(revision 30376)
+++ trunk/ippTasks/publish.pro	(revision 41545)
@@ -38,5 +38,4 @@
 end
 
-
 macro publish.revert.on
   task publish.revert
@@ -51,4 +50,20 @@
 end
 
+macro show.publish.books
+  book npages SURVEY_PUBLISH -var N
+  for i 0 $N
+    book getpage SURVEY_PUBLISH $i
+  end
+  echo "SURVEY_PUBLISH: $SURVEY_PUBLISH"
+end
+
+macro show.publish.book
+ if ($0 != 2)
+   echo "USAGE: show.publish.book (page)"
+   break
+ end
+
+ book listpage SURVEY_PUBLISH $1
+end  
 
 # this variable will cycle through the known database names