home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / comp / unix / aix / 11695 < prev    next >
Encoding:
Internet Message Format  |  1992-11-18  |  8.6 KB
  1. Path: sparky!uunet!charon.amdahl.com!pacbell.com!ames!saimiri.primate.wisc.edu!zaphod.mps.ohio-state.edu!cs.utexas.edu!qt.cs.utexas.edu!news.Brown.EDU!noc.near.net!pacvax!markeatonmac
  2. From: eaton@pacersoft.com (Mark W. Eaton)
  3. Newsgroups: comp.unix.aix
  4. Subject: Re: GNU emacs
  5. Message-ID: <eaton-181192134048@markeatonmac.pacersoft.com>
  6. Date: 18 Nov 92 18:47:22 GMT
  7. References: <1992Nov17.034640.28336@chpc.utexas.edu>
  8. Sender: news@pacvax.UUCP
  9. Followup-To: comp.unix.aix
  10. Organization: Pacer Software, Inc.
  11. Lines: 219
  12. Nntp-Posting-Host: markeatonmac
  13.  
  14. In article <1992Nov17.034640.28336@chpc.utexas.edu>, jones@chpc.utexas.edu
  15. (Willaim L. Jones) wrote:
  16. > 
  17. > Has anyone one noticed that arrow keys do not work in gnu emacs 18.59-15.57.
  18. > 
  19. > Does anyone have a solution or any insights to the problem.
  20. > 
  21. > My only insight is the fact that AIX does not give emacs all of the 
  22. > characters that the arrow key generates to emacs at the same time 
  23. > like every other system.
  24. > 
  25. > Bill Jones
  26.  
  27. Yes, keymapping is a mess under AIX compared to any other Unix system. 
  28. Since I still haven't gotten emacs working fully with my customizations (I
  29. use both the arrow keys and the keypad), I use emacs on another Unix system
  30. and edit the files I need over NFS.  I hav a file from some kind netter
  31. below which exemplifies the kind of work needed to map keys correctly. 
  32. Unfortunately, I don't have the netter's name, but let him/her be thanked
  33. here.
  34.  
  35. FWIW, this has been heavily customized; you should extract the bits you
  36. need.
  37.  
  38. Mark Eaton
  39. Pacer Software, Inc.
  40. eaton@pacersoft.com
  41.  
  42. ! .keymap - An example for xterm keymaps.
  43. !
  44. ! Default keymap: keypad is in NumLock state.
  45. ! ScrollLock switches to emacs-keymap, F10 to ftp-keymap.
  46. ! A few other keys also have special effects.
  47. !
  48. *VT100.Translations: #override \
  49.     Mod1 Shift<Key>A:    string(0x43) \n\
  50.     Mod1    <Key>A:        string(0x63) \n\
  51.     Mod1    <Key>Delete:    string(0x17) \n\
  52.     Shift    <Key>Delete:    string(0x7f) \n\
  53.         <Key>Delete:    string(0x08) \n\
  54.         <Key>L2:    string("!!") string(0x0d) \n\
  55.         <Key>L4:    string(0x03) \n\
  56.         <Key>Linefeed:    string(" | more") string(0x0d) \n\
  57.         <Key>F10:    keymap(ftp) \n\
  58.         <Key>R1:    string("(") \n\
  59.         <Key>R2:    string(")") \n\
  60.         <Key>R3:    keymap(emacspad) \n\
  61.         <Key>Num_Lock:    ignore() \n\
  62.         <Key>R4:    string("=") \n\
  63.         <Key>R5:    string("/") \n\
  64.         <Key>R6:    string("*") \n\
  65.         <Key>KP_Subtract: string("-") \n\
  66.         <Key>R7:    string("7") \n\
  67.         <Key>Up:    string("8") \n\
  68.         <Key>R9:    string("9") \n\
  69.         <Key>KP_Add:    string("+") \n\
  70.         <Key>Left:    string("4") \n\
  71.         <Key>R11:    string("5") \n\
  72.         <Key>Right:    string("6") \n\
  73.         <Key>R13:    string("1") \n\
  74.         <Key>Down:    string("2") \n\
  75.         <Key>R15:    string("3") \n\
  76.         <Key>Insert:    string("0") \n\
  77.         <Key>KP_Decimal: string(".") \n\
  78.         <Key>KP_Enter:    string(0x0d)
  79.  
  80. ! Emacs keymap:
  81. ! L* and F* keys are bound to the default escape sequences. Modify to suit
  82. ! your taste ...
  83. ! The right keypad sends different strings for different modifier states:
  84. ! Unmodified keys generally do what you'd expect.
  85. ! <Control> send modified movement commands (like forward-word ...)
  86. ! <Shift> and <Lock> generally send the characters printed on the keys.
  87. ! <Meta> sends the associated number as numeric argument for a command.
  88. ! Numlock switches back to the default keymap.
  89. ! Some bindings refer to elisp functions I made up. I have listed these
  90. ! further below. See for yourself whether you find them useful.
  91. !
  92. *VT100.emacspadKeymap.translations: \
  93.         <Key>Delete:    string(0x7f) \n\
  94.         <Key>L1:    keymap(None) string(0x1b) string("[192z") \n\
  95.         <Key>L2:    string(0x1b) string("[193z") \n\
  96.         <Key>L3:    string(0x1b) string("[194z") \n\
  97.         <Key>L4:    string(0x1b) string("[195z") \n\
  98.         <Key>L5:    string(0x1b) string("[196z") \n\
  99.         <Key>L6:    string(0x1b) string("[197z") \n\
  100.         <Key>L7:    string(0x1b) string("[198z") \n\
  101.         <Key>L8:    string(0x1b) string("[199z") \n\
  102.         <Key>L9:    string(0x1b) string("[200z") \n\
  103.         <Key>L10:    string(0x1b) string("[201z") \n\
  104.         <Key>F1:    string(0x1b) string("[224z") \n\
  105.         <Key>F2:    string(0x1b) string("[225z") \n\
  106.         <Key>F3:    string(0x1b) string("[226z") \n\
  107.         <Key>F4:    string(0x1b) string("[227z") \n\
  108.         <Key>F5:    string(0x1b) string("[228z") \n\
  109.         <Key>F6:    string(0x1b) string("[229z") \n\
  110.         <Key>F7:    string(0x1b) string("[230z") \n\
  111.         <Key>F8:    string(0x1b) string("[231z") \n\
  112.         <Key>F9:    string(0x1b) string("[232z") \n\
  113.         <Key>F10:    string(0x1b) string("[233z") \n\
  114.         <Key>KP_F1:     string(0x1b) string("[234z") \n\
  115.         <Key>KP_F2:     string(0x1b) string("[235z") \n\
  116.         <Key>KP_F3:    string(0x1b) string("[236z") \n\
  117.         <Key>KP_F4:    string(0x1b) string("[237z") \n\
  118.         <Key>Break:    string(0x1b) string("[223z") \n\
  119.         <Key>Help:    string(0x08) \n\
  120.         <Key>R1:    string(0x18) string(0x02) \n\
  121.         <Key>R2:    string(0x1b) \
  122.                 string("xelectric-command-history") \
  123.                 string(0x0d) \n\
  124.         <Key>R3:    string(0x07) \n\
  125.         <Key>Num_Lock:    keymap(None) \n\
  126.     Ctrl    <Key>R4:    string(0x1b) string("xgoto-line") \
  127.                 string(0x0d) \n\
  128.     Mod1    <Key>R4:    string(0x1b) string("xwhat-cursor-position") \
  129.                 string(0x0d) \n\
  130.     Shift    <Key>R4:    string("=") \n\
  131.     Lock    <Key>R4:    string("=") \n\
  132.         <Key>R4:    string(0x1b) string("xwhat-line") \
  133.                 string(0x0d) \n\
  134.     Ctrl    <Key>R5:    string(0x12) \n\
  135.     Mod1    <Key>R5:    string(0x1b) string("xre-search-forward") \
  136.                 string(0x0d) \n\
  137.     Shift    <Key>R5:    string("/") \n\
  138.     Lock    <Key>R5:    string("/") \n\
  139.         <Key>R5:    string(0x13) \n\
  140.     Ctrl    <Key>R6:    string(0x1b) string("xtoggle-read-only") \
  141.                 string(0x0d) \n\
  142.     Mod1    <Key>R6:    string(0x1b) string("xrevert-buffer")\n\
  143.     Shift    <Key>R6:    string("*") \n\
  144.     Lock    <Key>R6:    string("*") \n\
  145.         <Key>R6:    string(0x1b) string("xauto-fill-mode") \
  146.                 string(0x0d) \n\
  147.     Ctrl    <Key>KP_Subtract: string(0x1b) string("k") \n\
  148.     Mod1    <Key>KP_Subtract: string(0x1b) string("-") \n\
  149.     Shift    <Key>KP_Subtract: string("-") \n\
  150.     Lock    <Key>KP_Subtract: string("-") \n\
  151.         <Key>KP_Subtract: string(0x0b) \n\
  152.     Ctrl    <Key>R7:    string(0x1b) string("xbackward-beg-of-line") \
  153.                 string(0x0d) \n\
  154.     Mod1    <Key>R7:    string(0x1b) string("7") \n\
  155.     Shift    <Key>R7:    string("7") \n\
  156.     Lock    <Key>R7:    string("7") \n\
  157.         <Key>R7:    string(0x1b) string("<") \n\
  158.     Ctrl    <Key>Up:    string(0x1b) string("xbackward-paragraph") \
  159.                 string(0x0d) \n\
  160.     Mod1    <Key>Up:    string(0x1b) string("8") \n\
  161.     Shift    <Key>Up:    string("8") \n\
  162.     Lock    <Key>Up:    string("8") \n\
  163.         <Key>Up:    string(0x10) \n\
  164.     Ctrl    <Key>R9:    string(0x1b) string("xbackward-end-of-line") \
  165.                 string(0x0d) \n\
  166.     Mod1    <Key>R9:    string(0x1b) string("9") \n\
  167.     Shift    <Key>R9:    string("9") \n\
  168.     Lock    <Key>R9:    string("9") \n\
  169.         <Key>R9:    string(0x1b) string("v") \n\
  170.     Ctrl    <Key>KP_Add:    string(0x18) string("1") \n\
  171.     Mod1    <Key>KP_Add:    string(0x18) string("2") \n\
  172.     Shift    <Key>KP_Add:    string("+") \n\
  173.     Lock    <Key>KP_Add:    string("+") \n\
  174.         <Key>KP_Add:    string(0x18) string("o") \n\
  175.     Ctrl    <Key>Left:    string(0x1b) string("b") \n\
  176.     Mod1    <Key>Left:    string(0x1b) string("4") \n\
  177.     Shift    <Key>Left:    string("4") \n\
  178.     Lock    <Key>Left:    string("4") \n\
  179.         <Key>Left:    string(0x02) \n\
  180.     Ctrl    <Key>R11:    string(0x1b) string("xback-to-indentation") \
  181.                 string(0x0d) \n\
  182.     Mod1    <Key>R11:    string(0x1b) string("5") \n\
  183.     Shift    <Key>R11:    string("5") \n\
  184.     Lock    <Key>R11:    string("5") \n\
  185.         <Key>R11:    string(0x0c) \n\
  186.     Ctrl    <Key>Right:    string(0x1b) string("f") \n\
  187.     Mod1    <Key>Right:    string(0x1b) string("6") \n\
  188.     Shift    <Key>Right:    string("6") \n\
  189.     Lock    <Key>Right:    string("6") \n\
  190.         <Key>Right:    string(0x06) \n\
  191.     Ctrl    <Key>R13:    string(0x1b) string("xforward-beg-of-line") \
  192.                 string(0x0d) \n\
  193.     Mod1    <Key>R13:    string(0x1b) string("1") \n\
  194.     Shift    <Key>R13:    string("1") \n\
  195.     Lock    <Key>R13:    string("1") \n\
  196.         <Key>R13:    string(0x1b) string(">") \n\
  197.     Ctrl    <Key>Down:    string(0x1b) string("xforward-paragraph") \
  198.                 string(0x0d) \n\
  199.     Mod1    <Key>Down:    string(0x1b) string("2") \n\
  200.     Shift    <Key>Down:    string("2") \n\
  201.     Lock    <Key>Down:    string("2") \n\
  202.         <Key>Down:    string(0x0e) \n\
  203.     Ctrl    <Key>R15:    string(0x1b) string("xforward-end-of-line") \
  204.                 string(0x0d) \n\
  205.     Mod1    <Key>R15:    string(0x1b) string("3") \n\
  206.     Shift    <Key>R15:    string("3") \n\
  207.     Lock    <Key>R15:    string("3") \n\
  208.         <Key>R15:    string(0x16) \n\
  209.     Ctrl    <Key>Insert:    string(0x1b) string("xforward-to-indentation")\
  210.                 string(0x0d) \n\
  211.     Mod1    <Key>Insert:    string(0x1b) string("0") \n\
  212.     Shift    <Key>Insert:    string("0") \n\
  213.     Lock    <Key>Insert:    string("0") \n\
  214.         <Key>Insert:    string(0x1b) string("xset-mark-command") \
  215.                 string(0x0d) \n\
  216.     Ctrl    <Key>KP_Decimal: string(0x1b) string("d") \n\
  217.     Mod1    <Key>KP_Decimal: string(0x1b) string(".") \n\
  218.     Shift    <Key>KP_Decimal: string(".") \n\
  219.     Lock    <Key>KP_Decimal: string(".") \n\
  220.         <Key>KP_Decimal: string(0x04) \n\
  221.         <Key>Alt_L:    string(0x18) \n\
  222.         <Key>Alt_R:    string(0x18) string("4") \n\
  223.         <Key>Super_R:    string(0x03)
  224.  
  225. ! ftp keymap: avoid typos when I ftp ...
  226. *VT100.ftpKeymap.translations: \
  227.         <Key>R3:    keymap(emacspad) \n\
  228.         <Key>Num_Lock:    keymap(None) \n\
  229.         <Key>F10:    string("ftp ") \n\
  230.         <Key>KP_F1:    string("anonymous") string(0x0d) \n\
  231.         <Key>KP_F2:    string("* put your email address here *") \
  232.                 string(0x0d)
  233.