Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
lyskom-elisp-client
lyskom-elisp-client
Commits
c6851654
Commit
c6851654
authored
Jun 02, 2012
by
David Byers
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Hantera lite obsoleta funktioner bättre
parent
f5aa5673
Changes
3
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
17 additions
and
6 deletions
+17
-6
src/ChangeLog
src/ChangeLog
+8
-0
src/commands2.el
src/commands2.el
+3
-2
src/compatibility.el
src/compatibility.el
+6
-4
No files found.
src/ChangeLog
View file @
c6851654
2011-01-06 David Byers <davby@ida.liu.se>
Compatibility with Emacs 24:
* compatibility.el (function-obsolete-p): Count functions as
obsolete if they are undefined (for Emacs 24).
(process-kill-without-query): Handle case where
set-process-query-on-exit-flag is undefined.
2012-05-24 Per Cederqvist <cederp@opera.com>
Fixed typo in doc-string.
...
...
src/commands2.el
View file @
c6851654
...
...
@@ -2381,8 +2381,9 @@ This command accepts text number prefix arguments \(see
(
save-current-buffer
(
set-buffer
buffer
)
(
if
(
eq
(
process-status
lyskom-proc
)
'open
)
(
initiate-get-time
'keep
nil
)
(
lyskom-stop-keep-alive
)))
(
error
(
lyskom-stop-keep-alive
))))
(
lyskom-stop-keep-alive
)
(
message
"Terminating keep-alive"
)))
(
error
(
message
"ERROR!"
)
(
lyskom-stop-keep-alive
))))
(
def-kom-command
kom-keep-alive
()
"Keep the LysKOM session alive by sending a request every once in a
...
...
src/compatibility.el
View file @
c6851654
...
...
@@ -677,12 +677,14 @@ Emacsen."
(
lyskom-function-alias
function-obsolete-p
(
function
)
"Return non-nil if FUNCTION is obsolete"
(
get
function
'byte-obsolete-info
))
(
or
(
not
(
fboundp
function
))
(
get
function
'byte-obsolete-info
)))
(
eval-and-compile
(
if
(
and
(
lyskom-function-obsolete-p
'process-kill-without-query
)
(
fboundp
'set-process-query-on-exit-flag
))
(
fset
'lyskom-set-process-query-on-exit-flag
'set-process-query-on-exit-flag
)
(
if
(
lyskom-function-obsolete-p
'process-kill-without-query
)
(
if
(
fboundp
'set-process-query-on-exit-flag
)
(
fset
'lyskom-set-process-query-on-exit-flag
'set-process-query-on-exit-flag
)
(
defun
(
lyskom-set-process-query-on-exit-flag
(
&rest
args
))))
(
fset
'lyskom-set-process-query-on-exit-flag
'process-kill-without-query
)))
(
eval-and-compile
...
...
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