emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/adoc-mode cacd4e8f67 127/199: Correct links. Avoid some wa


From: ELPA Syncer
Subject: [nongnu] elpa/adoc-mode cacd4e8f67 127/199: Correct links. Avoid some warnings for adoc-mode-test.el
Date: Sun, 3 Sep 2023 06:59:40 -0400 (EDT)

branch: elpa/adoc-mode
commit cacd4e8f6773da85ebe17b733eb5e74f2f7c379c
Author: Tobias Zawada <TOZ@esi-group.com>
Commit: Tobias Zawada <TOZ@esi-group.com>

    Correct links. Avoid some warnings for adoc-mode-test.el
---
 README.md         |  4 ++--
 adoc-mode-test.el | 13 +++++++++++--
 2 files changed, 13 insertions(+), 4 deletions(-)

diff --git a/README.md b/README.md
index 184f8787c0..26739f7690 100644
--- a/README.md
+++ b/README.md
@@ -15,12 +15,12 @@ be easily ignored.
 ## Download
 
 The raw file (adoc-mode.el) can be found
-[here](https://raw.github.com/sensorflo/adoc-mode/master/adoc-mode.el).
+[here](https://raw.github.com/emacsorphanage/adoc-mode/master/adoc-mode.el).
 Optionally you can get the sources from the [git
 repository](https://github.com/emacsorphanage/adoc-mode).
 
 You will also need to download the library
-[markup-faces](https://github.com/emacsorphanage/markup-faces). If you install
+[markup-faces](https://github.com/sensorflo/markup-faces). If you install
 adoc-mode via Emacs Lisp Packages, see below, markup-faces is installed
 automatically if you don't have it yet.
 
diff --git a/adoc-mode-test.el b/adoc-mode-test.el
index 1e48b32eb5..b1115b681e 100644
--- a/adoc-mode-test.el
+++ b/adoc-mode-test.el
@@ -21,8 +21,17 @@
 ;;   - beginning/end of buffer
 ;;   - beginning/end of paragraph
 ;;   - side-to-side yes/no with next same construct
+;; checkdoc-params: (NAME ARGS)
 (defun adoctest-faces (name &rest args)
-  "Todo document adoctest-faces NAME ARGS."
+  "Test font-lock on concatenation of STRING1 ... STRINGn.
+
+The k-th string STRINGk with k=1,...,n `should' be fontified
+with FACEk.
+STRING1, FACE1, ..., STRINGn, FACEn are free.
+
+NAME is just for identifying the test.
+
+\(fn NAME STRING1 FACE1 ... STRINGn FACEn)"
   (let ((not-done t)
        (font-lock-support-mode))
     (with-temp-buffer
@@ -33,7 +42,7 @@
 
       ;; exercise
       (adoc-mode)
-      (font-lock-fontify-buffer)
+      (font-lock-fontify-region (point-min) (point-max))
 
       ;; verify
       (goto-char (point-min))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]