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> "]]
|
||||
}
|
||||
|
||||
proc identity {text} { return $text }
|
||||
|
||||
lappend transforms [list {None} identity]
|
||||
lappend transforms [list {One line} oneline]
|
||||
lappend transforms [list {Line/Word/Char} wordcount]
|
||||
lappend transforms [list {Dedent} dedent]
|
||||
|
|
Loading…
Reference in a new issue