diff options
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)." ;;; Locking support (defvar url-dav-lock-identifier (concat "mailto:" user-mail-address) - "*URL used as contact information when creating locks in DAV. + "URL used as contact information when creating locks in DAV. This will be used as the contents of the DAV:owner/DAV:href tag to identify the owner of a LOCK when requesting it. This will be shown 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 @@ (defvar url-handler-regexp "\\`\\(https?\\|ftp\\|file\\|nfs\\)://" - "*A regular expression for matching URLs handled by `file-name-handler-alist'. + "A regular expression for matching URLs handled by `file-name-handler-alist'. Some valid URL protocols just do not make sense to visit interactively \(about, data, info, irc, mailto, etc\). This regular expression 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 @@ ("facsimiletelephonenumber" . "Fax") ("postaladdress" . "Mailing Address") ("description" . "Notes")) - "*An assoc list mapping LDAP attribute names to pretty descriptions of them.") + "An assoc list mapping LDAP attribute names to pretty descriptions of them.") (defvar url-ldap-attribute-formatters '(("mail" . (lambda (x) (format "<a href='mailto:%s'>%s</a>" x x))) @@ -76,7 +76,7 @@ ("namingcontexts" . url-ldap-dn-formatter) ("defaultnamingcontext" . url-ldap-dn-formatter) ("member" . url-ldap-dn-formatter)) - "*An assoc list mapping LDAP attribute names to pretty formatters for them.") + "An assoc list mapping LDAP attribute names to pretty formatters for them.") (defsubst url-ldap-attribute-pretty-name (n) (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 @@ (defvar url-nfs-automounter-directory-spec "file:/net/%h%f" - "*How to invoke the NFS automounter. Certain % sequences are recognized. + "How to invoke the NFS automounter. Certain % sequences are recognized. %h -- the hostname of the NFS server %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.") ;; FIXME!! (RFC 2616 gives examples like `compress, gzip'.) (defvar url-mime-encoding-string nil - "*String to send in the Accept-encoding: field in HTTP requests.") + "String to send in the Accept-encoding: field in HTTP requests.") ;; Perhaps the first few should actually be given decreasing `q's and ;; the list should be trimmed significantly. @@ -233,7 +233,7 @@ Generated according to current coding system priorities." ";q=0.5")))) (defvar url-mime-charset-string nil - "*String to send in the Accept-charset: field in HTTP requests. + "String to send in the Accept-charset: field in HTTP requests. The MIME charset corresponding to the most preferred coding system is given priority 1 and the rest are given priority 0.5.") @@ -364,7 +364,7 @@ Currently supported methods: (defvar url-parse-syntax-table (copy-syntax-table emacs-lisp-mode-syntax-table) - "*A syntax table for parsing URLs.") + "A syntax table for parsing URLs.") (modify-syntax-entry ?' "\"" url-parse-syntax-table) (modify-syntax-entry ?` "\"" url-parse-syntax-table) @@ -373,7 +373,7 @@ Currently supported methods: (modify-syntax-entry ?/ " " url-parse-syntax-table) (defvar url-load-hook nil - "*Hooks to be run after initializing the URL library.") + "Hooks to be run after initializing the URL library.") ;;; Make OS/2 happy - yeeks ;; (defvar tcp-binary-process-input-services nil |