Skip to content

Commit 367fe90

Browse files
authored
Update jcs-template.el
1 parent f9a15e0 commit 367fe90

File tree

1 file changed

+3
-0
lines changed

1 file changed

+3
-0
lines changed

jcs-template.el

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -68,11 +68,13 @@
6868
;; (@* "Util" )
6969
;;
7070

71+
;;;###autoload
7172
(defun jcs-current-file-empty-p (&optional fn)
7273
"Check if the FN an empty file."
7374
(if fn (with-current-buffer fn (and (bobp) (eobp)))
7475
(and (bobp) (eobp))))
7576

77+
;;;###autoload
7678
(defun jcs-string-compare-p (regexp str type &optional ignore-case)
7779
"Compare STR with REGEXP by TYPE.
7880
@@ -91,6 +93,7 @@ or `suffix'."
9193
(`suffix (string-suffix-p regexp str ignore-case))
9294
(t (ignore-errors (string-match-p regexp str)))))
9395

96+
;;;###autoload
9497
(defun jcs-contain-list-type-str (elt list type &optional reverse)
9598
"Return non-nil if ELT is listed in LIST.
9699

0 commit comments

Comments
 (0)