* utilsmenu: removed menu items for defunct utilities

diff --git a/citadel/ChangeLog b/citadel/ChangeLog
index 5765d23492447bdc5fdffec4430db55faba7989d..4a1501c6aba86aeaa7e9da82901685a4b9a047a8 100644 (file)
--- a/citadel/ChangeLog
+++ b/citadel/ChangeLog
@@ -1,3 +1,6 @@
+Mon Jul  5 17:01:29 EDT 1999 Art Cancro <ajc@uncnsrd.mt-kisco.ny.us>
+       * utilsmenu: removed menu items for defunct utilities
+
 Mon Jun 28 16:24:10 EDT 1999 Art Cancro <ajc@uncnsrd.mt-kisco.ny.us>
        * Changed any remaining references to UUCP, to "Internet" instead.
 

diff --git a/citadel/utilsmenu b/citadel/utilsmenu
index 631c57baecd55049fc76d0bcc26f431ecb0dc270..6f3f3cc86cb7981b31c1c11b93ceb97fb00ada25 100755 (executable)
--- a/citadel/utilsmenu
+++ b/citadel/utilsmenu
@@ -1,6 +1,10 @@
+#!/bin/sh
+
 # Citadel/UX Utilities Menu (shell script)
-# version 1.00 - March 1989
-# see copyright.doc for copyright information
+# version 1.1 - July 1999
+# see copyright.txt for copyright information
+
+MORECMD=less
 
 while true
 do
@@ -10,41 +14,30 @@ do
        echo "                    Citadel/UX Utilities Menu"
        cat <<!!
 
- a. Citadel/UX login                     g. Mail utilities
- b. Sysop utilities                      h. Read call log
- c. Calling statistics                   i. List last 20 users
- d. Message file statistics              j. Who is logged in
- e. User administration                  k. Setup and configuration
- f. User list with passwords             q. Quit
+ a. Citadel/UX login                     g. 
+ b.                                      h. Read call log
+ c. Calling statistics                   i. 
+ d.                                      j. Who is logged in
+ e.                                      k. Setup and configuration
+ f. User list                            q. Quit
 
 !!
        echo "Please enter your selection:"
        read x
        case $x in
-               [a,A])  citadel
-                       ;;
-               [b,B])  sysoputil
-                       ;;
-               [c,C])  stats 
-                       read y
+               [a,A])  ./citadel
                        ;;
-               [d,D])  msgstats |more -cw
-                       ;;
-               [e,E])  useradmin
+               [c,C])  ./stats |$MORECMD
                        ;;
                [f,F])  clear
-                       userlist -p |more -cw
-                       ;;
-               [g,G])  mailutil
-                       ;;
-               [h,H])  readlog |more -cw
+                       ./userlist |$MORECMD
                        ;;
-               [i,I])  readlog -t |more -cw
+               [h,H])  ./readlog |$MORECMD
                        ;;
-               [j,J])  whobbs |more -cw
+               [j,J])  ./whobbs |$MORECMD
                        ;;
                [k,K])  clear
-                       setup
+                       ./setup
                        ;;
                [q,Q])  clear
                        break;;