[elpa] externals/org-contacts 4a592d90f3 1/2: Cosmetic fixes for org-contacts

[ELPA Syncer]

branch: externals/org-contacts
commit 4a592d90f3a67641109fec9abc9157035f09a476
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: stardiviner <numbchild@gmail.com>

    Cosmetic fixes for org-contacts
    
    BTW, here's another cosmetic patch.  It fixes the following:
    - Remove some redundant dependencies (already satisfied by Emacs-27.1).
    - Fix a too-wide docstring.
    - Use `;;` for comments because `;;;` is for section headers.
    
            Stefan
---
 org-contacts.el | 21 +++++++++++----------
 1 file changed, 11 insertions(+), 10 deletions(-)

diff --git a/org-contacts.el b/org-contacts.el
index 9f35d9c589..816325e0a9 100644
--- a/org-contacts.el
+++ b/org-contacts.el
@@ -6,7 +6,7 @@
 ;; Maintainer: stardiviner <numbchild@gmail.com>
 ;; Keywords: contacts, org-mode, outlines, hypermedia, calendar
 ;; Version: 1.0
-;; Package-Requires: ((emacs "27.1") (cl-lib "0.7") (org "9.3.4") (gnus 
"5.13"))
+;; Package-Requires: ((emacs "27.1") (org "9.3.4"))
 ;; Homepage: https://repo.or.cz/org-contacts.git
 ;;
 ;; This file is not part of GNU Emacs.
@@ -56,11 +56,11 @@
 
 ;;;; Usage:
 
-;;; How to search?
-;;; - You can use [M-x org-contacts] command to search.
-;;;
-;;; - You can use `org-sparse-tree' [C-c / p] to filter based on a
-;;;   specific property. Or other matcher on `org-sparse-tree'.
+;; How to search?
+;; - You can use [M-x org-contacts] command to search.
+;;
+;; - You can use `org-sparse-tree' [C-c / p] to filter based on a
+;;   specific property. Or other matcher on `org-sparse-tree'.
 
 ;;; Code:
 
@@ -691,8 +691,9 @@ description."
 
 ;;;###autoload
 (defun org-contacts-org-complete-function ()
-  "Function used in `completion-at-point-functions' in `org-mode' to complete 
@name.
-Usage: (add-hook \\='completion-at-point-functions 
#\\='org-contacts-org-complete-function nil \\='local)"
+  "completion-at-point function to complete @name in `org-mode'.
+Usage: (add-hook \\='completion-at-point-functions
+                 #\\='org-contacts-org-complete-function nil \\='local)"
   (when-let* ((end (point))
               (begin (save-excursion (skip-chars-backward "[:alnum:]@") 
(point)))
               (symbol (buffer-substring-no-properties begin end))
@@ -1255,8 +1256,8 @@ are effectively trimmed).  If nil, all zero-length 
substrings are retained."
     (cdr (reverse proplist))))
 
 ;;;###autoload
-;;; Add an Org link type `org-contact:' for easy jump to or searching 
org-contacts headline.
-;;; link spec: [[org-contact:query][desc]]
+;; Add an Org link type `org-contact:' for easy jump to or searching 
org-contacts headline.
+;; link spec: [[org-contact:query][desc]]
 (if (fboundp 'org-link-set-parameters)
     (org-link-set-parameters "org-contact"
                              :follow #'org-contacts-link-open