Guess you can make a sow's ear out of a silk purse -- personal taste; too bad you can't
go the other way.

----- Original Message -----
From: "Lionel Dyck" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, February 15, 2002 11:04 AM
Subject: THE Profile for ISPF users (closer)


> Here is what I've cobled together to get THE to work more like ISPF for
> me.  It is a start and by no means perfect but y'all are welcome to it.
>
> set compat xedit xedit xedit
> set color arrow    gray blue
> set color cb       grey blue
> set color cmdline  white blue
> set color cu       blue gray
> set color ct       grey blue
> set color filearea white blue
> set color gap      white blue
> set color id       blue gray
> set color prefix   yellow blue
> set color scale    yellow blue
> set color st       blue gray
> set color tof      grey blue
> set clock on
> set case mixed
> set cmdline top
> set scale on 1
> set curline 2
> set coloring off
> define 'Control-R' sos doprefix execute
> "define Enter cursor screen down# sos prefix"
> "define END    REXX if (inprefix()) then 'sos leftedge'; sos endchar"
> 'Set Prefix Synonym a f'
> 'Set Prefix Synonym r "'
>
> --------------------------------------------------------------------
> Lionel B. Dyck, Systems Software Lead
> Kaiser Permanente Information Technology
> 25 N. Via Monte Ave
> Walnut Creek, Ca 94598
>
> Phone:   (925) 926-5332 (tie line 8/473-5332)
> E-Mail:    [EMAIL PROTECTED]
> Sametime: (use Lotus Notes address)
> AIM:        lbdyck

Reply via email to