'Bind' strangeness in Alpha 7.2b1

New Message Reply Date view Thread view Subject view Author view

From: Masatsugu Nagata (nagata@KURIMS.KYOTO-U.AC.JP)
Date: 24 Feb 99, 00:07 EST


From: Masatsugu Nagata <nagata@KURIMS.KYOTO-U.AC.JP>
Subject: 'Bind' strangeness in Alpha 7.2b1

Hi,

Thanks, juan, for your message:

> and, after full initialization, the bind of this Shift-Tab is to ring::-
> but after a short Find/Batch/Multiple  I think this binding is made
> automatically in an indirect way...  there is no Bind 0x30 <s> ring::-
>
> good luck.
>
Yes, you gave me luck, indeed.  Your information gave me inspiration, and
I found it !!!  :-)

It was in:

":Tcl:SystemCode:alphaDefinitions.tcl" array set keys::specialBindings

and in:

":Tcl:Packages:elecBindings.tcl" proc elec::presetKeyBindings

Those bindings were set via menu.  That was the reason why my bindings via
the "Bind" definition were overridden.  (See the definition of the
electricMenu in the 'electricMenu.tcl' file.)

Johan, could this fact (that the bindings via the menus override the
bindings via 'Bind') be recorded in the documentation, to lessen the
confusion of the users, please?

Jonathan, could you see if it's possible to make the internal function
'bindingList' (used by the "All Key Bindings" menu command) include
the list of those bindings defined via menus, too?


Now, to modify that <option-Tab> binding for the 'insertActualTab' proc
to <shift-Tab>, here is my modification.  First, record what's modified
into the 'prefs.tcl', as a reminder, as follows:

# in "SystemCode:alphaDefinitions.tcl" keys::specialBindings
# #     "Prev Stop" "<U/c"
# #     "Real Tab" "<I/c"
#     "Prev Stop" "<I<U/c"
#     "Real Tab" "<U/c"
# in "Packages:elecBindings.tcl" elec::presetKeyBindings
# #             "Prev Stop" "<U/c"
# #             "Real Tab" "<I/c"
#               "Prev Stop" "<I<U/c"
#               "Real Tab" "<U/c"
# #             "Real Tab" "<I/c"
#               "Real Tab" "<U/c"

Next, open the 'alphaDefinitions.tcl' and 'elecBindings.tcl' files
and do the needed modification.

WARNING:  Do _not_ comment-out the lines inside the
        array set keys::specialBindings
definition.  If you do that, Alpha will complain at each startup, by
beeping twice and then flashing a message "bad array '#'" very quickly
(for about thirteen milliseconds, on my 117mHz PB5300ce.  ;-)

Don't leave the commented lines inside the array definition;
instead, just directly edit the "<I/c" to "<U/c".


Next, in addition, ANOTHER step is required --

Open the file ":Alpha-v7:Cache:elecMenu:elec-" inside your Preferences
Folder, and edit the "<I/c" to "<U/c" in there, too.  If you don't do this,
each time Alpha 7.2b1 is launched, the electricMenu starts up with the
<option-Tab> bound to the "Real Tab" item, and it is only changed to
<shift-Tab>, only after a mode-change occurs.


After all of the modification of the three files:
'alphaDefinitions.tcl', 'elecBindings.tcl' and 'elec-',
everything was what I wanted:  <shift-Tab> inserts a real Tab character.
Bravo!  :-)

It took me quite a long time to figure out that I have to edit the files
inside the "Cache" folder, to change the behaviour of Alpha at the startup
time.  :(

Mark
--
Mark Nagata
mailto:nagata@kurims.kyoto-u.ac.jp


New Message Reply Date view Thread view Subject view Author view

This archive was generated by das@users.sourceforge.net with hypermail 2b29 on 31 Mar 01, 11:50 EST