lines-before.fish: prints lines that occur before a given pattern

gistpkg.zpl

name = lines-before

author = Chris Olstrom

license = MIT

provides = fish/functions/lines-before

requires
    command/awk
    fish/builtin/case
    fish/builtin/count
    fish/builtin/echo
    fish/builtin/end
    fish/builtin/function
    fish/builtin/return
    fish/builtin/switch

lines-before.fish

function lines-before --argument pattern
    switch (count $argv)
        case 0
            echo 'usage: lines-before <pattern>'
            return 100
        case '*'
            awk "/$pattern/ { exit }; 1"
    end
end