RE: Workaround for <Ctrl+T> SELECTWORD -- CODE400-L

Hi Dave,

Thanks for the reply.

There must be a problem with the list-serv stripping out the "end" if its on
a line by itself. I checked in my sent items folder and the "end" is there.
Anyone seen this happen before?

As you point out, there should be an "end" on a line by itself after the
line beginning 'set wordchars. Also, in the FIND.LX and FINDNEXT.LX macros
for the <Ctrl+F> and <Ctrl+N> shortcut keys there should be an "end" on a
line by itself after each of the LP_ commands.

Thanks for the pointer regarding the modification to the mouse actions. I've
added it to my profile.lx file.

Regards,

Brian


P.S. Are you the Dave Shaw that used to work at GNC in Greenville?

-----Original Message-----
From: code400-l-admin@midrange.com
[mailto:code400-l-admin@midrange.com]On Behalf Of Shaw, Dave
Sent: Tuesday, November 27, 2001 10:04 AM
To: 'code400-l@midrange.com'
Subject: RE: Workaround for <Ctrl+T> SELECTWORD



Brian,

Two comments:

1) The code you show has a minor syntax error - there's no End to go with
the Do.

2) For anyone (like me) who uses the mouse occasionally as well as the
shortcut keys, it's nice to also include

        'set action.button1double BLOCK MARK WORD'

This keeps the mouse button 1 double-click action the same as Ctl-T.

Thanks for the idea and the code!

Dave Shaw
Rauch Industries, Inc.
Gastonia, NC

-----Original Message-----
From: Brian D. James [mailto:bjames@isdsolutions.net]

In an earlier post I expressed a dislike for the way the <Ctrl+T> SELECTWORD
function works. It selects the entire RPG field the cursor is in instead of
just the RPG symbolic name the cursor is on. The following is the workaround
I'm now using to achieve my desired results.

First, I made the following modification to my profile.lx file to add the
special characters allowed in RPG symbolic names to the characters
considered as part of a WORD.


/* load customizations for specific document types */
'extract doctype'

   /* RPG source file customizations */
if doctype='RPG' | doctype = 'IRP' then do

      /* Add the special characters (@,#,$,_) allowed in RPG symbolic    */
      /* names to the list of characters that are considered part of a   */
      /* word - This allows for the BLOCK MARK WORD function <Ctrl+T> to */
      /* select the entire RPG symbolic name.                            */
       'extract wordchars into a'
       'set wordchars 'a'#@$_'
   /* end RPG source file customizations */


Then, I modified my profile.lx file to change the action for <Ctrl+T> from
SELECTWORD to BLOCK MARK WORD.


 'set action.c-t BLOCK MARK WORD'


Using this workaround, pressing <Ctrl+T> now selects only the RPG symbolic
name (e.g., record format name or variable name) the cursor is positioned
on.
_______________________________________________
This is the CODE/400 Discussion & Support (CODE400-L) mailing list
To post a message email: CODE400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/code400-l
or email: CODE400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/code400-l.