Author: ek.kato
Date: Mon Mar 3 02:19:24 2008
New Revision: 5272
Modified:
trunk/scm/sj3-custom.scm
Log:
* scm/sj3.scm (sj3-user) : Fix for change in r5262.
Modified: trunk/scm/sj3-custom.scm
==============================================================================
--- trunk/scm/sj3-custom.scm (original)
+++ trunk/scm/sj3-custom.scm Mon Mar 3 02:19:24 2008
@@ -319,7 +319,7 @@
(lambda ()
sj3-use-remote-server?))
-(define-custom 'sj3-user (or (home-directory (user-name)) "")
+(define-custom 'sj3-user (or (user-name) "")
'(sj3-advanced sj3server)
'(string ".*")
(N_ "SJ3 user name")