[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/shadowfile.el
From: |
Romain Francoise |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/shadowfile.el |
Date: |
Sat, 24 Sep 2005 09:44:30 -0400 |
Index: emacs/lisp/shadowfile.el
diff -c emacs/lisp/shadowfile.el:1.26 emacs/lisp/shadowfile.el:1.27
*** emacs/lisp/shadowfile.el:1.26 Sat Aug 6 22:13:43 2005
--- emacs/lisp/shadowfile.el Sat Sep 24 13:44:00 2005
***************
*** 438,444 ****
(sit-for 2))
try-regexp))
; (username (read-no-blanks-input
! ; (format "Username [default: %s]: "
; (shadow-get-user primary))
; (if old (or (shadow-cluster-username old) "")
; (user-login-name))))
--- 438,444 ----
(sit-for 2))
try-regexp))
; (username (read-no-blanks-input
! ; (format "Username (default %s): "
; (shadow-get-user primary))
; (if old (or (shadow-cluster-username old) "")
; (user-login-name))))
***************
*** 458,464 ****
(name (nth 2 hup))
user site group)
(while (setq site (shadow-read-site))
! (setq user (read-string (format "Username [default %s]: "
(shadow-get-user site)))
name (read-string "Filename: " name))
(setq group (cons (shadow-make-fullname site
--- 458,464 ----
(name (nth 2 hup))
user site group)
(while (setq site (shadow-read-site))
! (setq user (read-string (format "Username (default %s): "
(shadow-get-user site)))
name (read-string "Filename: " name))
(setq group (cons (shadow-make-fullname site
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/shadowfile.el,
Romain Francoise <=