diff options
author | Stefan Kangas <stefan@marxist.se> | 2021-09-14 08:43:18 +0200 |
---|---|---|
committer | Stefan Kangas <stefan@marxist.se> | 2021-09-16 19:37:07 +0200 |
commit | 63f419f1339cbd0a7d1e64586854a4f01b3f80d1 (patch) | |
tree | 80bce487ec8c4f7d8258d13a49b21cb4eb3f289b /lisp/net/quickurl.el | |
parent | 36474a1e490a5eae266805a0e04615741d56692c (diff) | |
download | emacs-63f419f1339cbd0a7d1e64586854a4f01b3f80d1.tar.gz |
; Minor stylistic fixes found by checkdoc
Diffstat (limited to 'lisp/net/quickurl.el')
-rw-r--r-- | lisp/net/quickurl.el | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/lisp/net/quickurl.el b/lisp/net/quickurl.el index 2574c8cb63e..046953faf6e 100644 --- a/lisp/net/quickurl.el +++ b/lisp/net/quickurl.el @@ -24,19 +24,19 @@ ;;; Commentary: ;; ;; This package provides a simple method of inserting a URL based on the -;; text at point in the current buffer. This is part of an on-going effort +;; text at point in the current buffer. This is part of an on-going effort ;; to increase the information I provide people while reducing the amount -;; of typing I need to do. No-doubt there are undiscovered Emacs packages +;; of typing I need to do. No-doubt there are undiscovered Emacs packages ;; out there that do all of this and do it better, feel free to point me to ;; them, in the mean time I'm having fun playing with Emacs Lisp. ;; ;; The URLs are stored in an external file as a list of either cons cells, -;; or lists. A cons cell entry looks like this: +;; or lists. A cons cell entry looks like this: ;; ;; (<Lookup> . <URL>) ;; ;; where <Lookup> is a string that acts as the keyword lookup and <URL> is -;; the URL associated with it. An example might be: +;; the URL associated with it. An example might be: ;; ;; ("GNU" . "https://www.gnu.org/") ;; @@ -45,8 +45,8 @@ ;; (<Lookup> <URL> <Comment>) ;; ;; where <Lookup> and <URL> are the same as with the cons cell and <Comment> -;; is any text you like that describes the URL. This description will be -;; used when presenting a list of URLS using `quickurl-list'. An example +;; is any text you like that describes the URL. This description will be +;; used when presenting a list of URLS using `quickurl-list'. An example ;; might be: ;; ;; ("FSF" "https://www.fsf.org/" "The Free Software Foundation") @@ -215,8 +215,8 @@ Note that this function is a setfable place." (defun quickurl-url-comment (url) "Get the comment from a URL. -If the URL has no comment an empty string is returned. Also note that this -function is a setfable place." +If the URL has no comment an empty string is returned. Also note +that this function is a setfable place." (declare (gv-setter (lambda (store) `(if (quickurl-url-commented-p ,url) |