gistfile1.ls

filter-function = ->
    fs = []
    fs.push <| mss.query-filter(dialog.find('.node-selector-search').val!)
    fs.push <| (.is-orphan) if dialog.find('.orphan-pages').is(':checked')
    fs.push <| (x) -> any (<| x), [
        (.languages) >> empty
        (.languages) >> (`intersection` languages) >> empty >> (not)
    ]
    (x) -> all (<| x), fs