identity function
This commit is contained in:
parent
2aaf3d2106
commit
d0b055c469
|
@ -28,6 +28,9 @@ proc markdown_quote {text} {
|
||||||
return [string cat "> " [regsub -all \n $text "\n> "]]
|
return [string cat "> " [regsub -all \n $text "\n> "]]
|
||||||
}
|
}
|
||||||
|
|
||||||
|
proc identity {text} { return $text }
|
||||||
|
|
||||||
|
lappend transforms [list {None} identity]
|
||||||
lappend transforms [list {One line} oneline]
|
lappend transforms [list {One line} oneline]
|
||||||
lappend transforms [list {Line/Word/Char} wordcount]
|
lappend transforms [list {Line/Word/Char} wordcount]
|
||||||
lappend transforms [list {Dedent} dedent]
|
lappend transforms [list {Dedent} dedent]
|
||||||
|
|
Loading…
Reference in a new issue