ariadne
/
smol
2
1
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Added fkey equivs to browser 

git-svn-id: svn://svn.savannah.gnu.org/nano/trunk/nano@439 35c25a1d-7b9e-4130-9fde-d3aeb78583b8
master
Chris Allegretta 2001-01-04 04:41:08 +00:00
parent f0999a18f0
commit 6e82741931
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
files.c
View File

@ -1238,6 +1238,7 @@ char *do_browser(char *inpath)
selected++; selected++;
break; break;
case NANO_PREVPAGE_KEY: case NANO_PREVPAGE_KEY:
case NANO_PREVPAGE_FKEY:
case KEY_PPAGE: case KEY_PPAGE:
if ((selected / width) % editwinrows == 0) { if ((selected / width) % editwinrows == 0) {
if (selected - (editwinrows * width) >= 0) if (selected - (editwinrows * width) >= 0)
@ -1253,6 +1254,7 @@ char *do_browser(char *inpath)
selected = 0; selected = 0;
break; break;
case NANO_NEXTPAGE_KEY: case NANO_NEXTPAGE_KEY:
case NANO_NEXTPAGE_FKEY:
case KEY_NPAGE: case KEY_NPAGE:
if ((selected / width) % editwinrows == 0) { if ((selected / width) % editwinrows == 0) {
if (selected + (editwinrows * width) <= numents - 1) if (selected + (editwinrows * width) <= numents - 1)
@ -1302,6 +1304,7 @@ char *do_browser(char *inpath)
case 'Q': case 'Q':
case 'e': /* Pico compatibility, yeech */ case 'e': /* Pico compatibility, yeech */
case 'E': case 'E':
case NANO_EXIT_FKEY:
abort = 1; abort = 1;
break; break;
} }