[nongnu] elpa/toc-org 4380d99113 065/128: add unit test for #31

[ELPA Syncer]

branch: elpa/toc-org
commit 4380d99113689f7bb43ed73c2c6d97e0c70d506c
Author: Sergei Nosov <sergei.nosov@gmail.com>
Commit: Sergei Nosov <sergei.nosov@gmail.com>

    add unit test for #31
---
 toc-org.el | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/toc-org.el b/toc-org.el
index 6a456d4c20..f21f45d73e 100644
--- a/toc-org.el
+++ b/toc-org.el
@@ -323,6 +323,13 @@ each heading into a link."
                                         hash)
                    " - [[ABOUT][About]]\n"))
     (should (equal (gethash "ABOUT" hash) "About")))
+  ;; check trailing space: https://github.com/snosov1/toc-org/pull/31
+  (let ((hash (make-hash-table :test 'equal)))
+    (should (equal (toc-org-hrefify-toc "* About  \n"
+                                        (lambda (str &optional hash) (upcase 
str))
+                                        hash)
+                   " - [[ABOUT][About]]\n"))
+    (should (equal (gethash "ABOUT" hash) "About")))
   (let ((hash (make-hash-table :test 'equal)))
     (should (equal (toc-org-hrefify-toc "* About\n* Installation\n** via 
package.el\n** Manual\n* Use\n* Different href styles\n* Example\n" (lambda 
(str &optional hash) (upcase str)) hash)
                    " - [[ABOUT][About]]\n - [[INSTALLATION][Installation]]\n   
- [[VIA PACKAGE.EL][via package.el]]\n   - [[MANUAL][Manual]]\n - 
[[USE][Use]]\n - [[DIFFERENT HREF STYLES][Different href styles]]\n - 
[[EXAMPLE][Example]]\n"))