Skip to content
GitLab
Menu
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
lyskom-elisp-client
lyskom-elisp-client
Commits
355ca0f7
Commit
355ca0f7
authored
May 03, 2002
by
Per Cederqvist
Browse files
(kom-obsolete-extended-command-binding): Be annoying both ways.
parent
bb4a0cd9
Changes
2
Hide whitespace changes
Inline
Side-by-side
src/ChangeLog
View file @
355ca0f7
2002-05-03 Per Cederqvist <ceder@ingate.com>
* commands2.el (kom-obsolete-extended-command-binding): Be
annoying both ways.
2002-05-01 David Byers <david.byers@swipnet.se>
* commands1.el (kom-move-text-tree): New command, innit?
...
...
src/commands2.el
View file @
355ca0f7
...
...
@@ -2908,10 +2908,10 @@ Tryck p
----------------------------------------------------------------
"
'(face kom-warning-face))
(d
ing
)
;; Make sure the user actually gets a beep.
(
if visible-bell
(let ((visible-bell nil))
(ding)))
;; Beep both visibly and audibly, if possible. We *want* to be annoy
ing
.
(let ((visible-bell t))
(
ding))
(let ((visible-bell nil))
(ding)))
(read-from-minibuffer
(lyskom-format "
%#1@Tryck
return
eller
enter
fr
att
g
vidare:
"
'
(
face
kom-warning-face
)))
)
Write
Preview
Supports
Markdown
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