Mercurial > emacs
comparison lisp/eshell/esh-util.el @ 35209:d434b679c77b
(eshell-ange-ls-uids): Fix :type.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Wed, 10 Jan 2001 17:00:51 +0000 |
parents | e21feeab77fb |
children | 31904bdf4350 |
comparison
equal
deleted
inserted
replaced
35208:afe5cbe595f5 | 35209:d434b679c77b |
---|---|
1 ;;; esh-util --- general utilities | 1 ;;; esh-util --- general utilities |
2 | 2 |
3 ;; Copyright (C) 1999, 2000 Free Software Foundation | 3 ;; Copyright (C) 1999, 2000, 2001 Free Software Foundation |
4 | 4 |
5 ;; Author: John Wiegley <johnw@gnu.org> | 5 ;; Author: John Wiegley <johnw@gnu.org> |
6 | 6 |
7 ;; This file is part of GNU Emacs. | 7 ;; This file is part of GNU Emacs. |
8 | 8 |
96 :type 'regexp | 96 :type 'regexp |
97 :group 'eshell-util) | 97 :group 'eshell-util) |
98 | 98 |
99 (defcustom eshell-ange-ls-uids nil | 99 (defcustom eshell-ange-ls-uids nil |
100 "*List of user/host/id strings, used to determine remote ownership." | 100 "*List of user/host/id strings, used to determine remote ownership." |
101 :type '(list (cons :tag "Host/User Pair" | 101 :type '(alist :key-type (string :tag "Hostname") |
102 (string :tag "Hostname") | 102 :value-type (alist :tag "User/UID List" |
103 (repeat (cons :tag "User/UID List" | 103 :key-type (string :tag "Username") |
104 (string :tag "Username") | 104 :value-type (repeat :tag "UIDs" string))) |
105 (repeat :tag "UIDs" string))))) | |
106 :group 'eshell-util) | 105 :group 'eshell-util) |
107 | 106 |
108 ;;; Internal Variables: | 107 ;;; Internal Variables: |
109 | 108 |
110 (defvar eshell-group-names nil | 109 (defvar eshell-group-names nil |