[css2] Added "more" to interactive listing.

--HG--
extra : convert_revision : svn%3A73dc7c4b-06e6-40f3-b4f7-9ed1dbc14bfc/trunk%40167

Author: bert-github

css2/bin/Attic/issues

@@ -18,6 +18,8 @@ HTML=`dirname $0`/../issues.srb
 DATEFRM="+%d %b %Y"
 TMP=${TMPDIR:-/tmp}/issue.$$
 ARCH=`uname`
+PAGER=${PAGER:-more}
+
 
 pr ()
 {
@@ -239,13 +241,13 @@ interactive ()
       pr "? \c"
       read reply
       case "$reply" in
-	l) list_issues;;
+	l) list_issues | $PAGER;;
 	a) ref=; desc=; add_issue;;
 	r) num=; res=; resolve_issue;;
 	u) num=; update_issue;;
 	g) generate_html;;
-	t) list_unresolved;;
-	y) list_to_be_updated;;
+	t) list_unresolved | $PAGER ;;
+	y) list_to_be_updated | $PAGER;;
 	q) ;;
 	*) pr "Not understood, please try again"; reply=;;
       esac

css2/bin/Attic/todo

@@ -21,6 +21,8 @@ ISSUES=`dirname $0`/../DOC/todo.db
 HTML=`dirname $0`/../DOC/todo.srb
 DATEFRM="+%d %b %Y"
 ARCH=`uname`
+PAGER=${PAGER:-more}
+
 
 pr ()
 {
@@ -377,14 +379,14 @@ interactive ()
       pr "? \c"
       read reply
       case "$reply" in
-	l) list_issues;;
+	l) list_issues | $PAGER;;
 	a) ref=; desc=; add_issue;;
 	c) num=; comment=; add_comment;;
 	o) num=; own=; add_owner;;
 	+) num=; inc_prio;;
 	-) num=; dec_prio;;
 	r) num=; res=; resolve_issue;;
-	t) list_unresolved;;
+	t) list_unresolved | $PAGER;;
 	q) ;;
 	*) pr "Not understood, please try again"; reply=;;
       esac

css2/bin/issues

@@ -18,6 +18,8 @@ HTML=`dirname $0`/../issues.srb
 DATEFRM="+%d %b %Y"
 TMP=${TMPDIR:-/tmp}/issue.$$
 ARCH=`uname`
+PAGER=${PAGER:-more}
+
 
 pr ()
 {
@@ -239,13 +241,13 @@ interactive ()
       pr "? \c"
       read reply
       case "$reply" in
-	l) list_issues;;
+	l) list_issues | $PAGER;;
 	a) ref=; desc=; add_issue;;
 	r) num=; res=; resolve_issue;;
 	u) num=; update_issue;;
 	g) generate_html;;
-	t) list_unresolved;;
-	y) list_to_be_updated;;
+	t) list_unresolved | $PAGER ;;
+	y) list_to_be_updated | $PAGER;;
 	q) ;;
 	*) pr "Not understood, please try again"; reply=;;
       esac

css2/bin/todo

@@ -21,6 +21,8 @@ ISSUES=`dirname $0`/../DOC/todo.db
 HTML=`dirname $0`/../DOC/todo.srb
 DATEFRM="+%d %b %Y"
 ARCH=`uname`
+PAGER=${PAGER:-more}
+
 
 pr ()
 {
@@ -377,14 +379,14 @@ interactive ()
       pr "? \c"
       read reply
       case "$reply" in
-	l) list_issues;;
+	l) list_issues | $PAGER;;
 	a) ref=; desc=; add_issue;;
 	c) num=; comment=; add_comment;;
 	o) num=; own=; add_owner;;
 	+) num=; inc_prio;;
 	-) num=; dec_prio;;
 	r) num=; res=; resolve_issue;;
-	t) list_unresolved;;
+	t) list_unresolved | $PAGER;;
 	q) ;;
 	*) pr "Not understood, please try again"; reply=;;
       esac