Run lyskom-login-hook even if the person don't have a user-area.

src/flags.el

@@ -153,7 +153,9 @@ If successful then set the buffer not-modified. Else print a warning."
 
 
 (defun lyskom-read-options ()
-  "Reads the user-area and sets the variables according to the choises."
+  "Reads the user-area and sets the variables according to the choises.
+Also run lyskom-login-hook (regardless of whether the person has a userarea
+or not."
   (if (and lyskom-pers-no
 	   (not (zerop lyskom-pers-no)))
       (initiate-get-pers-stat 'options 'lyskom-read-options-2 lyskom-pers-no)))
@@ -165,7 +167,9 @@ If successful then set the buffer not-modified. Else print a warning."
       (progn 
 	  (setq lyskom-other-clients-user-areas)
 	  (if (zerop (pers-stat->user-area pers-stat))
-	      (setq lyskom-do-when-starting kom-do-when-starting)
+	      (prog1
+		  (setq lyskom-do-when-starting kom-do-when-starting)
+		(run-hooks 'lyskom-login-hook))
 	    (initiate-get-text 'options 'lyskom-read-options-eval
 			       (pers-stat->user-area pers-stat))))
     (lyskom-insert-string 'you-dont-exist)))