Lines Matching defs:user
33 ;; called was loaded remotely (ange-ftp), the host and user name are obtained
38 ;; loaded locally, remote-compile prompts for a host and user and assumes the
41 ;; See the user defined variables section for more info.
72 ;;;; user defined variables
85 (defcustom remote-compile-user nil
87 nil means use the value returned by \\[user-login-name]."
105 (defcustom remote-compile-prompt-for-user nil
106 "*Non-nil means prompt for user if not available from filename."
114 (defvar remote-compile-user-history nil)
122 ;; functions to provide user, host and localname of a remote filename,
127 (defun remote-compile (host user command)
133 host user command prompt l l-host l-user)
138 user l-user))
149 user (if remote-compile-prompt-for-user
151 "Compile by user (default %s): "
152 (or remote-compile-user
153 (user-login-name)))
155 'remote-compile-user-history)
156 remote-compile-user)))
161 (if (string= user "") remote-compile-user user)
164 (cond (user
165 (setq remote-compile-user user))
166 ((null remote-compile-user)
167 (setq remote-compile-user (user-login-name))))
175 remote-compile-user
195 remote-compile-user