account.pm
branchcms
changeset 22 4d73e4ea84cd
parent 18 e3710b49e8e4
child 23 72ba031fec20
--- a/account.pm	Wed Aug 02 12:03:45 2006 +0000
+++ b/account.pm	Wed Aug 09 07:57:14 2006 +0000
@@ -370,6 +370,8 @@
     );
     die $r->error if $r->code;
 
+    #if (-t STDOUT) { open(LESS, "|less -F -X") and select LESS; }
+
 
     while (my $e = $r->shift_entry) {
 	my $uid = $e->get_value("uid");