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
1f9e761d
Commit
1f9e761d
authored
Apr 08, 1994
by
Karl Heuer
Browse files
(comint-exec-1): Handle both termcap and terminfo.
parent
a8015ab5
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
7 additions
and
3 deletions
+7
-3
lisp/comint.el
lisp/comint.el
+7
-3
No files found.
lisp/comint.el
View file @
1f9e761d
...
...
@@ -553,9 +553,13 @@ buffer. The hook `comint-exec-hook' is run after each exec."
(
defun
comint-exec-1
(
name
buffer
command
switches
)
(
let
((
process-environment
(
nconc
(
list
"EMACS=t"
"TERM=emacs"
(
format
"TERMCAP=emacs:co#%d:tc=unknown"
(
frame-width
)))
process-environment
)))
(
nconc
(
if
(
and
(
boundp
'system-uses-terminfo
)
system-uses-terminfo
)
(
list
"EMACS=t"
"TERM=unknown"
(
format
"COLUMNS=%d"
(
frame-width
)))
(
list
"EMACS=t"
"TERM=emacs"
(
format
"TERMCAP=emacs:co#%d:tc=unknown"
(
frame-width
))))
process-environment
)))
(
apply
'start-process
name
buffer
command
switches
)))
;;; Input history processing in a buffer
...
...
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