kom-who-is-on-and-friend visar lyskom-pers-no också. Jag vill se mig själv.

src/ChangeLog

 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

@@ -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))