SMOLNET PORTAL home about changes
iHide symbols trailing the tag and skip #nospoil - bitreich-memestats - Bitreich meme statistics and graphs.	Err	bitreich.org	70
hgit clone git://bitreich.org/bitreich-memestats git://hg6vgqziawt5s4dj.onion/bitreich-memestats	URL:git://bitreich.org/bitreich-memestats git://hg6vgqziawt5s4dj.onion/bitreich-memestats	bitreich.org	70
1Log	/scm/bitreich-memestats/log.gph	bitreich.org	70
1Files	/scm/bitreich-memestats/files.gph	bitreich.org	70
1Refs	/scm/bitreich-memestats/refs.gph	bitreich.org	70
1Tags	/scm/bitreich-memestats/tag	bitreich.org	70
1LICENSE	/scm/bitreich-memestats/file/LICENSE.gph	bitreich.org	70
i---	Err	bitreich.org	70
1commit f8c777510e9663561ed292baaef1de5cfb7b4b91	/scm/bitreich-memestats/commit/f8c777510e9663561ed292baaef1de5cfb7b4b91.gph	bitreich.org	70
1parent d08ff10b40479174b132e313726b406692972e35	/scm/bitreich-memestats/commit/d08ff10b40479174b132e313726b406692972e35.gph	bitreich.org	70
hAuthor: Anders Damsgaard <anders@adamsgaard.dk>	URL:mailto:anders@adamsgaard.dk	bitreich.org	70
iDate:   Fri, 17 Apr 2020 10:02:44 +0200	Err	bitreich.org	70
i	Err	bitreich.org	70
iHide symbols trailing the tag and skip #nospoil	Err	bitreich.org	70
i	Err	bitreich.org	70
iDiffstat:	Err	bitreich.org	70
i  M Makefile                            |       2 +-	Err	bitreich.org	70
i  M extract_memeuse.awk                 |      10 +++++++---	Err	bitreich.org	70
i	Err	bitreich.org	70
i2 files changed, 8 insertions(+), 4 deletions(-)	Err	bitreich.org	70
i---	Err	bitreich.org	70
1diff --git a/Makefile b/Makefile	/scm/bitreich-memestats/file/Makefile.gph	bitreich.org	70
i@@ -1,6 +1,6 @@	Err	bitreich.org	70
i log = ~/.irssi/log/Freenode/\#bitreich-en.log	Err	bitreich.org	70
i 	Err	bitreich.org	70
i-memeuse.tsv: extract_memeuse.awk $(log)	Err	bitreich.org	70
i+memeuse.tsv: extract_memeuse.awk	Err	bitreich.org	70
i         awk -f extract_memeuse.awk $(log) > $@	Err	bitreich.org	70
i 	Err	bitreich.org	70
i clean:	Err	bitreich.org	70
1diff --git a/extract_memeuse.awk b/extract_memeuse.awk	/scm/bitreich-memestats/file/extract_memeuse.awk.gph	bitreich.org	70
i@@ -40,6 +40,7 @@ function extract_tag(s) {	Err	bitreich.org	70
i         match(s, /#.*/);	Err	bitreich.org	70
i         s = substr(s, RSTART, RLENGTH);	Err	bitreich.org	70
i         gsub(/ .*/, "", s);	Err	bitreich.org	70
i+        gsub(/[!?,\.]$/, "", s);	Err	bitreich.org	70
i         return s;	Err	bitreich.org	70
i }	Err	bitreich.org	70
i 	Err	bitreich.org	70
i@@ -59,8 +60,11 @@ function extract_time(s) {	Err	bitreich.org	70
i # find tag in current line	Err	bitreich.org	70
i / #[A-Za-z0-9]+/ {	Err	bitreich.org	70
i         if (! /< annna>/ && ! /#bitreich-en/) {	Err	bitreich.org	70
i-                printf("%s\t%s\-%s\-%s\t%s\t%s\t%s\n",	Err	bitreich.org	70
i-                       n_days, year, month, day,	Err	bitreich.org	70
i-                           extract_time($0), extract_user($0), extract_tag($0));	Err	bitreich.org	70
i+                tag = extract_tag($0);	Err	bitreich.org	70
i+                if (!match(tag, "#nospoil")) {	Err	bitreich.org	70
i+                        printf("%s\t%s\-%s\-%s\t%s\t%s\t%s\n",	Err	bitreich.org	70
i+                                   n_days, year, month, day,	Err	bitreich.org	70
i+                                   extract_time($0), extract_user($0), tag);	Err	bitreich.org	70
i+                }	Err	bitreich.org	70
i         }	Err	bitreich.org	70
i }	Err	bitreich.org	70
.
Response: text/plain
Original URLgopher://bitreich.org/0/scm/bitreich-memestats/commit/f8c...
Content-Typetext/plain; charset=utf-8