summaryrefslogtreecommitdiff
path: root/lisp/net/quickurl.el
diff options
context:
space:
mode:
authorStefan Kangas <stefan@marxist.se>2021-09-14 08:43:18 +0200
committerStefan Kangas <stefan@marxist.se>2021-09-16 19:37:07 +0200
commit63f419f1339cbd0a7d1e64586854a4f01b3f80d1 (patch)
tree80bce487ec8c4f7d8258d13a49b21cb4eb3f289b /lisp/net/quickurl.el
parent36474a1e490a5eae266805a0e04615741d56692c (diff)
downloademacs-63f419f1339cbd0a7d1e64586854a4f01b3f80d1.tar.gz
; Minor stylistic fixes found by checkdoc
Diffstat (limited to 'lisp/net/quickurl.el')
-rw-r--r--lisp/net/quickurl.el16
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)