iFix md2point title and filename generation. - pointtools - Simple point utilities to hold text presentations. Err bitreich.org 70 hgit clone git://bitreich.org/pointtools/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/pointtools/ URL:git://bitreich.org/pointtools/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/pointtools/ bitreich.org 70 1Log /scm/pointtools/log.gph bitreich.org 70 1Files /scm/pointtools/files.gph bitreich.org 70 1Refs /scm/pointtools/refs.gph bitreich.org 70 1Tags /scm/pointtools/tag bitreich.org 70 1README /scm/pointtools/file/README.md.gph bitreich.org 70 1LICENSE /scm/pointtools/file/LICENSE.gph bitreich.org 70 i--- Err bitreich.org 70 1commit 59ccbc5ce8a8a064b6f022c9c74f54b8ffdc5a76 /scm/pointtools/commit/59ccbc5ce8a8a064b6f022c9c74f54b8ffdc5a76.gph bitreich.org 70 1parent c9cabf113958e40665b11a0fed6c61fecc1bb3d4 /scm/pointtools/commit/c9cabf113958e40665b11a0fed6c61fecc1bb3d4.gph bitreich.org 70 hAuthor: Christoph Lohmann <20h@r-36.net> URL:mailto:20h@r-36.net bitreich.org 70 iDate: Sun, 22 Jul 2018 18:00:39 +0200 Err bitreich.org 70 i Err bitreich.org 70 iFix md2point title and filename generation. Err bitreich.org 70 i Err bitreich.org 70 iDiffstat: Err bitreich.org 70 i M bin/md2point | 13 +++++++------ Err bitreich.org 70 i Err bitreich.org 70 i1 file changed, 7 insertions(+), 6 deletions(-) Err bitreich.org 70 i--- Err bitreich.org 70 1diff --git a/bin/md2point b/bin/md2point /scm/pointtools/file/bin/md2point.gph bitreich.org 70 i@@ -1,10 +1,11 @@ Err bitreich.org 70 i #!/bin/sh Err bitreich.org 70 i-# Err bitreich.org 70 i-# See LICENSE for license details. Err bitreich.org 70 i-# Err bitreich.org 70 i+ Err bitreich.org 70 i+# colors Err bitreich.org 70 i+reset="$(tput sgr0)" Err bitreich.org 70 i+quoteformat="$(tput setaf 6)" Err bitreich.org 70 i Err bitreich.org 70 i mkfilename() { Err bitreich.org 70 i- printf "%.4d-%s" "$1" "$2" | tr '# :.' '_' Err bitreich.org 70 i+ printf "%.4d-%s" "$1" "$2" | tr '# :.()/' '_' Err bitreich.org 70 i printf ".txt" Err bitreich.org 70 i } Err bitreich.org 70 i Err bitreich.org 70 i@@ -30,11 +31,11 @@ do Err bitreich.org 70 i fname="$(mkfilename "$snum" "$title")" Err bitreich.org 70 i snum=$((snum + 1)) Err bitreich.org 70 i printf "\n %s\n %s\n\n" \ Err bitreich.org 70 i- "$title" "$(mkunderline $titlelen "=")" > $fname Err bitreich.org 70 i+ "$title" "$(mkunderline $titlelen "=")" >> $fname Err bitreich.org 70 i ;; Err bitreich.org 70 i *) Err bitreich.org 70 i [ -n "$fname" ] && \ Err bitreich.org 70 i- printf " %s\n" "$line" \ Err bitreich.org 70 i+ printf " %s\n" "$line" \ Err bitreich.org 70 i | sed 's,\t, ,' \ Err bitreich.org 70 i | sed 's,\*,o,' >> $fname Err bitreich.org 70 i ;; Err bitreich.org 70 .