Dr. Werner Fink 2010-04-27 10:09:31 +00:00 committed by Git OBS Bridge
parent afba002acf
commit 9f8096aedf
2 changed files with 41 additions and 0 deletions

View File

@ -44,10 +44,13 @@ set backspace=indent,eol,start
" Try to get the correct main terminal type " Try to get the correct main terminal type
if &term =~ "xterm" if &term =~ "xterm"
let myterm = "xterm" let myterm = "xterm"
elseif &term =~ "screen"
let myterm = "screen"
else else
let myterm = &term let myterm = &term
endif endif
let myterm = substitute(myterm, "cons[0-9][0-9].*$", "linux", "") let myterm = substitute(myterm, "cons[0-9][0-9].*$", "linux", "")
let myterm = substitute(myterm, "cons[0-9][0-9].*$", "linux", "")
let myterm = substitute(myterm, "vt1[0-9][0-9].*$", "vt100", "") let myterm = substitute(myterm, "vt1[0-9][0-9].*$", "vt100", "")
let myterm = substitute(myterm, "vt2[0-9][0-9].*$", "vt220", "") let myterm = substitute(myterm, "vt2[0-9][0-9].*$", "vt220", "")
let myterm = substitute(myterm, "\\([^-]*\\)[_-].*$", "\\1", "") let myterm = substitute(myterm, "\\([^-]*\\)[_-].*$", "\\1", "")
@ -191,6 +194,39 @@ if myterm == "linux"
map <ESC>[G i map <ESC>[G i
endif endif
if myterm == "screen"
map! <ESC>[1;2D <S-Left>
map! <ESC>[1;2C <S-Right>
map! <ESC>[1;2A <S-Up>
map! <ESC>[1;2B <S-Down>
map! <ESC>[1;2H <Home>
map! <ESC>[1;2F <End>
map! <ESC>[2;2~ <Insert>
map! <ESC>[3;2~ <Delete>
map! <ESC>[5;2~ <PageUp>
map! <ESC>[6;2~ <PageDown>
map! <ESC>[1;5D <C-Left>
map! <ESC>[1;5C <C-Right>
map! <ESC>[1;5A <C-Up>
map! <ESC>[1;5B <C-Down>
map! <ESC>[1;5H <Home>
map! <ESC>[1;5F <End>
map! <ESC>[2;5~ <Insert>
map! <ESC>[3;5~ <Delete>
map! <ESC>[5;5~ <PageUp>
map! <ESC>[6;5~ <PageDown>
map! <ESC>[1;3D <A-Left>
map! <ESC>[1;3C <A-Right>
map! <ESC>[1;3A <A-Up>
map! <ESC>[1;3B <A-Down>
map! <ESC>[1;3H <Home>
map! <ESC>[1;3F <End>
map! <ESC>[2;3~ <Insert>
map! <ESC>[3;3~ <Delete>
map! <ESC>[5;3~ <PageUp>
map! <ESC>[6;3~ <PageDown>
endif
" This escape sequence is the well known ANSI sequence for " This escape sequence is the well known ANSI sequence for
" Remove Character Under The Cursor (RCUTC[tm]) " Remove Character Under The Cursor (RCUTC[tm])
map! <Esc>[3~ <Delete> map! <Esc>[3~ <Delete>

View File

@ -1,3 +1,8 @@
-------------------------------------------------------------------
Tue Apr 27 12:06:07 CEST 2010 - werner@suse.de
- Add screen control sequences to inputrc (bnc#598903)
------------------------------------------------------------------- -------------------------------------------------------------------
Sat Mar 27 11:48:28 CET 2010 - vuntz@opensuse.org Sat Mar 27 11:48:28 CET 2010 - vuntz@opensuse.org