Commit 98dd9a91 authored by David Kågedal's avatar David Kågedal
Browse files

(kom-change-language): Added prefix parameter to make global changes.

parent a85880b3
2002-04-24 David Kgedal <david@virtutech.se>
* commands2.el (kom-change-language): Added prefix parameter to
make global changes.
2002-04-23 David Byers <david.byers@swipnet.se>
Alternate text background color:
......
......@@ -2011,9 +2011,12 @@ Return-value: 'no-session if there is no suitable session to switch to
;;; ndra sprk
;;;
(def-kom-command kom-change-language ()
"Change the current language in LysKOM"
(interactive)
(def-kom-command kom-change-language (&optional global)
"Change the current language in LysKOM
The optional argument GLOBAL indicates that the change should have a
global effect, including changes to key binding."
(interactive "P")
(let* ((completion-ignore-case t)
(table (lyskom-available-language-list))
(language (lyskom-completing-read
......@@ -2025,7 +2028,7 @@ Return-value: 'no-session if there is no suitable session to switch to
'lyskom-language-history)))
(when (lyskom-string-assoc language table)
(lyskom-set-language (cdr (lyskom-string-assoc language table))
'local))))
(if global 'global 'local)))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment