source: trunk/athena/bin/discuss/mclient/disrc2meetings.sh @ 315

Revision 315, 1.1 KB checked in by wesommer, 38 years ago (diff)
Fixed version.
Line 
1#!/bin/csh -f
2# This takes a .disrc and creates a .meetings from it.
3# Written by Mark Eichin 4/2/87 pending the installation of the new discuss.
4#
5# I wrote this in 15 minutes. If you want real meeting names, write
6# a REAL program in C, or just fix them by hand with an editor.
7#
8# Modified same date Ken Raeburn to add 'echo' comments, and use
9# homedir for files.
10#
11# Modified 4/8/87 Bill Sommerfeld to also add the long-form names to
12# the meeting (by calling a C program to do this..)
13#
14# usage: disrc2meetings
15#
16
17echo "  "
18echo "  This shell script will create a .meetings file for you"
19echo "  from a .disrc file if you do not have a .meetings file."
20echo "  "
21
22if ( ! -f ~/.disrc ) then
23        echo "  You don't seem to have a .disrc file.  Run dsc_setup instead."
24        exit
25endif
26
27if ( -f ~/.meetings) then
28        echo "  You already have a meetings file.  Only adding long names.. "
29else
30        echo "  Creating .meetings file:"
31        set noclobber
32        sed < ~/.disrc >~/.meetings \
33                's/\([^:]*\):\([^:]*\):\([^:]*\):\([^:]*\):[0-9]*\([^:]*\)/0:\3:\2:\4:\5:\1:/'
34
35        echo "  Adding long names into .meetings file:"
36endif
37
38crmtgs
Note: See TracBrowser for help on using the repository browser.