diff options
| author | Chong Yidong | 2012-04-09 21:05:48 +0800 |
|---|---|---|
| committer | Chong Yidong | 2012-04-09 21:05:48 +0800 |
| commit | fb7ada5f94a71d73bf6cfad5cc87fe7fb26125a5 (patch) | |
| tree | eba43d1fa2427a77f1f6b1468838426b33ea5973 /lisp/url | |
| parent | a18ecafa99e7e7c3caa35ed68dd8a7b9b5d2b8e3 (diff) | |
| download | emacs-fb7ada5f94a71d73bf6cfad5cc87fe7fb26125a5.tar.gz emacs-fb7ada5f94a71d73bf6cfad5cc87fe7fb26125a5.zip | |
Remove * characters from the front of variable docstrings.
Diffstat (limited to 'lisp/url')
| -rw-r--r-- | lisp/url/url-dav.el | 2 | ||||
| -rw-r--r-- | lisp/url/url-handlers.el | 2 | ||||
| -rw-r--r-- | lisp/url/url-ldap.el | 4 | ||||
| -rw-r--r-- | lisp/url/url-nfs.el | 2 | ||||
| -rw-r--r-- | lisp/url/url-vars.el | 8 |
5 files changed, 9 insertions, 9 deletions
diff --git a/lisp/url/url-dav.el b/lisp/url/url-dav.el index 03527bceee7..085785524b7 100644 --- a/lisp/url/url-dav.el +++ b/lisp/url/url-dav.el | |||
| @@ -478,7 +478,7 @@ names (ie: DAV:resourcetype)." | |||
| 478 | 478 | ||
| 479 | ;;; Locking support | 479 | ;;; Locking support |
| 480 | (defvar url-dav-lock-identifier (concat "mailto:" user-mail-address) | 480 | (defvar url-dav-lock-identifier (concat "mailto:" user-mail-address) |
| 481 | "*URL used as contact information when creating locks in DAV. | 481 | "URL used as contact information when creating locks in DAV. |
| 482 | This will be used as the contents of the DAV:owner/DAV:href tag to | 482 | This will be used as the contents of the DAV:owner/DAV:href tag to |
| 483 | identify the owner of a LOCK when requesting it. This will be shown | 483 | identify the owner of a LOCK when requesting it. This will be shown |
| 484 | to other users when the DAV:lockdiscovery property is requested, so | 484 | to other users when the DAV:lockdiscovery property is requested, so |
diff --git a/lisp/url/url-handlers.el b/lisp/url/url-handlers.el index 4bc5bd47488..d00a1174cdf 100644 --- a/lisp/url/url-handlers.el +++ b/lisp/url/url-handlers.el | |||
| @@ -92,7 +92,7 @@ | |||
| 92 | 92 | ||
| 93 | (defvar url-handler-regexp | 93 | (defvar url-handler-regexp |
| 94 | "\\`\\(https?\\|ftp\\|file\\|nfs\\)://" | 94 | "\\`\\(https?\\|ftp\\|file\\|nfs\\)://" |
| 95 | "*A regular expression for matching URLs handled by `file-name-handler-alist'. | 95 | "A regular expression for matching URLs handled by `file-name-handler-alist'. |
| 96 | Some valid URL protocols just do not make sense to visit interactively | 96 | Some valid URL protocols just do not make sense to visit interactively |
| 97 | \(about, data, info, irc, mailto, etc\). This regular expression | 97 | \(about, data, info, irc, mailto, etc\). This regular expression |
| 98 | avoids conflicts with local files that look like URLs \(Gnus is | 98 | avoids conflicts with local files that look like URLs \(Gnus is |
diff --git a/lisp/url/url-ldap.el b/lisp/url/url-ldap.el index 7c988f9b119..0ea98cb06c9 100644 --- a/lisp/url/url-ldap.el +++ b/lisp/url/url-ldap.el | |||
| @@ -64,7 +64,7 @@ | |||
| 64 | ("facsimiletelephonenumber" . "Fax") | 64 | ("facsimiletelephonenumber" . "Fax") |
| 65 | ("postaladdress" . "Mailing Address") | 65 | ("postaladdress" . "Mailing Address") |
| 66 | ("description" . "Notes")) | 66 | ("description" . "Notes")) |
| 67 | "*An assoc list mapping LDAP attribute names to pretty descriptions of them.") | 67 | "An assoc list mapping LDAP attribute names to pretty descriptions of them.") |
| 68 | 68 | ||
| 69 | (defvar url-ldap-attribute-formatters | 69 | (defvar url-ldap-attribute-formatters |
| 70 | '(("mail" . (lambda (x) (format "<a href='mailto:%s'>%s</a>" x x))) | 70 | '(("mail" . (lambda (x) (format "<a href='mailto:%s'>%s</a>" x x))) |
| @@ -76,7 +76,7 @@ | |||
| 76 | ("namingcontexts" . url-ldap-dn-formatter) | 76 | ("namingcontexts" . url-ldap-dn-formatter) |
| 77 | ("defaultnamingcontext" . url-ldap-dn-formatter) | 77 | ("defaultnamingcontext" . url-ldap-dn-formatter) |
| 78 | ("member" . url-ldap-dn-formatter)) | 78 | ("member" . url-ldap-dn-formatter)) |
| 79 | "*An assoc list mapping LDAP attribute names to pretty formatters for them.") | 79 | "An assoc list mapping LDAP attribute names to pretty formatters for them.") |
| 80 | 80 | ||
| 81 | (defsubst url-ldap-attribute-pretty-name (n) | 81 | (defsubst url-ldap-attribute-pretty-name (n) |
| 82 | (or (cdr-safe (assoc (downcase n) url-ldap-pretty-names)) n)) | 82 | (or (cdr-safe (assoc (downcase n) url-ldap-pretty-names)) n)) |
diff --git a/lisp/url/url-nfs.el b/lisp/url/url-nfs.el index a22d105b1a1..bfab147f267 100644 --- a/lisp/url/url-nfs.el +++ b/lisp/url/url-nfs.el | |||
| @@ -29,7 +29,7 @@ | |||
| 29 | 29 | ||
| 30 | (defvar url-nfs-automounter-directory-spec | 30 | (defvar url-nfs-automounter-directory-spec |
| 31 | "file:/net/%h%f" | 31 | "file:/net/%h%f" |
| 32 | "*How to invoke the NFS automounter. Certain % sequences are recognized. | 32 | "How to invoke the NFS automounter. Certain % sequences are recognized. |
| 33 | 33 | ||
| 34 | %h -- the hostname of the NFS server | 34 | %h -- the hostname of the NFS server |
| 35 | %n -- the port # of the NFS server | 35 | %n -- the port # of the NFS server |
diff --git a/lisp/url/url-vars.el b/lisp/url/url-vars.el index a56eb4cc810..ff18049e97b 100644 --- a/lisp/url/url-vars.el +++ b/lisp/url/url-vars.el | |||
| @@ -212,7 +212,7 @@ Should be an assoc list of headers/contents.") | |||
| 212 | 212 | ||
| 213 | ;; FIXME!! (RFC 2616 gives examples like `compress, gzip'.) | 213 | ;; FIXME!! (RFC 2616 gives examples like `compress, gzip'.) |
| 214 | (defvar url-mime-encoding-string nil | 214 | (defvar url-mime-encoding-string nil |
| 215 | "*String to send in the Accept-encoding: field in HTTP requests.") | 215 | "String to send in the Accept-encoding: field in HTTP requests.") |
| 216 | 216 | ||
| 217 | ;; Perhaps the first few should actually be given decreasing `q's and | 217 | ;; Perhaps the first few should actually be given decreasing `q's and |
| 218 | ;; the list should be trimmed significantly. | 218 | ;; the list should be trimmed significantly. |
| @@ -233,7 +233,7 @@ Generated according to current coding system priorities." | |||
| 233 | ";q=0.5")))) | 233 | ";q=0.5")))) |
| 234 | 234 | ||
| 235 | (defvar url-mime-charset-string nil | 235 | (defvar url-mime-charset-string nil |
| 236 | "*String to send in the Accept-charset: field in HTTP requests. | 236 | "String to send in the Accept-charset: field in HTTP requests. |
| 237 | The MIME charset corresponding to the most preferred coding system is | 237 | The MIME charset corresponding to the most preferred coding system is |
| 238 | given priority 1 and the rest are given priority 0.5.") | 238 | given priority 1 and the rest are given priority 0.5.") |
| 239 | 239 | ||
| @@ -364,7 +364,7 @@ Currently supported methods: | |||
| 364 | 364 | ||
| 365 | (defvar url-parse-syntax-table | 365 | (defvar url-parse-syntax-table |
| 366 | (copy-syntax-table emacs-lisp-mode-syntax-table) | 366 | (copy-syntax-table emacs-lisp-mode-syntax-table) |
| 367 | "*A syntax table for parsing URLs.") | 367 | "A syntax table for parsing URLs.") |
| 368 | 368 | ||
| 369 | (modify-syntax-entry ?' "\"" url-parse-syntax-table) | 369 | (modify-syntax-entry ?' "\"" url-parse-syntax-table) |
| 370 | (modify-syntax-entry ?` "\"" url-parse-syntax-table) | 370 | (modify-syntax-entry ?` "\"" url-parse-syntax-table) |
| @@ -373,7 +373,7 @@ Currently supported methods: | |||
| 373 | (modify-syntax-entry ?/ " " url-parse-syntax-table) | 373 | (modify-syntax-entry ?/ " " url-parse-syntax-table) |
| 374 | 374 | ||
| 375 | (defvar url-load-hook nil | 375 | (defvar url-load-hook nil |
| 376 | "*Hooks to be run after initializing the URL library.") | 376 | "Hooks to be run after initializing the URL library.") |
| 377 | 377 | ||
| 378 | ;;; Make OS/2 happy - yeeks | 378 | ;;; Make OS/2 happy - yeeks |
| 379 | ;; (defvar tcp-binary-process-input-services nil | 379 | ;; (defvar tcp-binary-process-input-services nil |