1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17

module markdownquote {
  # Convert stdin to a markdown quote
  export def main []: string -> string {
    $in
    | lines
    | each {|l|
      let t = $l | str trim
      if ($t | str starts-with ">") {
        $t
      } else {
        $"> ($t)"
      }
    }
    | str join "\n"
  }
}
use markdownquote *