Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
11838c0e
Commit
11838c0e
authored
Mar 17, 1993
by
Eric S. Raymond
Browse files
Less klugey version of fix.
parent
c3d80a47
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
2 additions
and
3 deletions
+2
-3
src/term.c
src/term.c
+2
-3
No files found.
src/term.c
View file @
11838c0e
...
...
@@ -1238,7 +1238,6 @@ term_get_fkeys (address)
char
**
address
;
{
extern
char
*
tgetstr
();
char
capval
[
32
];
int
i
;
for
(
i
=
0
;
i
<
(
sizeof
(
keys
)
/
sizeof
(
keys
[
0
]));
i
++
)
...
...
@@ -1288,7 +1287,7 @@ term_get_fkeys (address)
else
fcap
[
1
]
=
'a'
+
i
-
11
;
if
(
tgetstr
(
fcap
,
&
capval
))
if
(
tgetstr
(
fcap
,
address
))
{
(
void
)
sprintf
(
fkey
,
"f%d"
,
i
);
Fdefine_key
(
Vfunction_key_map
,
...
...
@@ -1303,7 +1302,7 @@ term_get_fkeys (address)
*/
{
#define CONDITIONAL_REASSIGN(cap1, cap2, sym) \
if (!tgetstr(cap1,
&capval
) && tgetstr(cap2,
&capval
)) \
if (!tgetstr(cap1,
address
) && tgetstr(cap2,
address
)) \
Fdefine_key (Vfunction_key_map, \
build_string (cap2), \
Fmake_vector (make_number (1), intern (sym)))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment