iFilter syntax /pattern and / pattern - clic - Clic is an command line interactive client for gopher written in Common LISP	Err	bitreich.org	70
hgit clone git://bitreich.org/clic/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/clic/	URL:git://bitreich.org/clic/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/clic/	bitreich.org	70
1Log	/scm/clic/log.gph	bitreich.org	70
1Files	/scm/clic/files.gph	bitreich.org	70
1Refs	/scm/clic/refs.gph	bitreich.org	70
1Tags	/scm/clic/tag	bitreich.org	70
1README	/scm/clic/file/README.md.gph	bitreich.org	70
1LICENSE	/scm/clic/file/LICENSE.gph	bitreich.org	70
i---	Err	bitreich.org	70
1commit a7fb4e4758b562ca2c69e370619794b421263528	/scm/clic/commit/a7fb4e4758b562ca2c69e370619794b421263528.gph	bitreich.org	70
1parent f8678efc9938f34c2d873fe85c9d41015b1c7c4f	/scm/clic/commit/f8678efc9938f34c2d873fe85c9d41015b1c7c4f.gph	bitreich.org	70
hAuthor: Solene Rapenne <solene@perso.pw>	URL:mailto:solene@perso.pw	bitreich.org	70
iDate:   Tue, 23 Jan 2018 19:34:43 +0100	Err	bitreich.org	70
i	Err	bitreich.org	70
iFilter syntax /pattern and / pattern	Err	bitreich.org	70
i	Err	bitreich.org	70
iDiffstat:	Err	bitreich.org	70
i  M clic.lisp                           |      11 +++++++++--	Err	bitreich.org	70
i	Err	bitreich.org	70
i1 file changed, 9 insertions(+), 2 deletions(-)	Err	bitreich.org	70
i---	Err	bitreich.org	70
1diff --git a/clic.lisp b/clic.lisp	/scm/clic/file/clic.lisp.gph	bitreich.org	70
i@@ -329,7 +329,7 @@	Err	bitreich.org	70
i   ;; with only lines matching the string (no regex)	Err	bitreich.org	70
i   (loop for line across *previous-buffer*	Err	bitreich.org	70
i      do	Err	bitreich.org	70
i-       (when (search text line :test #'char-equal)	Err	bitreich.org	70
i+       (when (search text (car (split (subseq line 1) #\Tab)) :test #'char-equal)	Err	bitreich.org	70
i          (vector-push line *buffer*)))	Err	bitreich.org	70
i 	Err	bitreich.org	70
i   (display-buffer "1"))	Err	bitreich.org	70
i@@ -462,7 +462,14 @@	Err	bitreich.org	70
i      (p))	Err	bitreich.org	70
i 	Err	bitreich.org	70
i     ;; search a pattern in a menu	Err	bitreich.org	70
i-    ;; search should return 0 if we use it	Err	bitreich.org	70
i+    ;; syntax /pattern	Err	bitreich.org	70
i+    ((and	Err	bitreich.org	70
i+      (search "/" input)	Err	bitreich.org	70
i+      (> (length input) 1))	Err	bitreich.org	70
i+     (filter-line (subseq input 1)))	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+    ;; same as previously	Err	bitreich.org	70
i+    ;; but with syntax / pattern	Err	bitreich.org	70
i     ((= 0 (or (search "/ " input) 1))	Err	bitreich.org	70
i      (filter-line (subseq input 2)))	Err	bitreich.org	70
i 	Err	bitreich.org	70
.