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
e0018801
Commit
e0018801
authored
Apr 10, 2002
by
David Byers
Browse files
kom-who-is-on-and-friend visar lyskom-pers-no också. Jag vill se mig själv.
parent
80d7161f
Changes
2
Hide whitespace changes
Inline
Side-by-side
src/ChangeLog
View file @
e0018801
2002-04-11 David Byers <david.byers@swipnet.se>
Beter kom-who-is-on-and-friend:
* commands1.el (lyskom-select-friends-from-who-list): Show
lyskom-pers-no when filtering friends. Perhaps this should be a
configurable option. Someone else can deal with that :-)
* vars.el.in (lyskom-commands): Added kom-create-aux-item.
* swedish-strings.el (lyskom-command): Added kom-cereate-aux-item.
...
...
src/commands1.el
View file @
e0018801
...
...
@@ -3202,10 +3202,11 @@ Uses Protocol A version 9 calls"
(
defun
lyskom-select-friends-from-who-list
(
who-list
)
"Returns a list of friends in WHO-LIST"
(
let
((
result
nil
))
(
let
((
result
nil
)
(
extended-friends
(
cons
lyskom-pers-no
kom-friends
)))
(
while
(
not
(
null
who-list
))
(
when
(
memq
(
dynamic-session-info->person
(
car
who-list
))
kom
-friends
)
extended
-friends
)
(
setq
result
(
cons
(
car
who-list
)
result
)))
(
setq
who-list
(
cdr
who-list
)))
result
))
...
...
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