Skip to content
GitLab
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
23ba5eeb
Commit
23ba5eeb
authored
Dec 14, 2001
by
Ulrik Haugen
Browse files
case insensitive search is now the default for kom-list-re. fixes bug 295.
parent
bec476c3
Changes
2
Hide whitespace changes
Inline
Side-by-side
src/ChangeLog
View file @
23ba5eeb
2001-12-14 Ulrik Haugen <qha@lysator.liu.se>
* commands1.el (kom-list-re): case insensitive search is now the
default.
* swedish-strings.el, english-strings.el (lyskom-message): new
string: add-recpt-button-text
string: add-recpt-button-text
.
* edit-text.el (lyskom-edit-insert-miscs): use
add-recpt-button-text for the add recipient-button.
...
...
src/commands1.el
View file @
23ba5eeb
...
...
@@ -1799,15 +1799,15 @@ If you are not member in the conference it will be flagged with an asterisk."
(
apply
'concat
(
nreverse
res
))))
(
def-kom-command
kom-list-re
(
regexp
&optional
case-
in
sensitive
)
(
def-kom-command
kom-list-re
(
regexp
&optional
case-sensitive
)
"List all persons and conferences whose name matches REGEXP.
If the optional argument CASE-
IN
SENSITIVE is true, the regexp will
be
converted so that the search is case
in
sensitive."
If the optional argument CASE-SENSITIVE is true, the regexp will
not
be
converted so that the search is case sensitive."
(
interactive
(
list
(
lyskom-read-string
(
lyskom-get-string
'search-re
))
current-prefix-arg
))
(
if
case-
in
sensitive
(
setq
regexp
(
lyskom-make-re-case-insensitive
regexp
)))
(
unless
case-sensitive
(
setq
regexp
(
lyskom-make-re-case-insensitive
regexp
)))
(
lyskom-format-insert
'matching-regexp
regexp
)
(
let
((
conf-list
(
blocking-do
're-z-lookup
regexp
1
1
)))
(
if
conf-list
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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