filename.lua

-- Inserts a filename with a (if possible) relative path
-- from a file select dialog.
module('_m.common.filename', package.seeall)

-- ## Commands

-- Opens a file select dialog and inserts filename in the buffer.
function insert_filename()
  local current_dir = (buffer.filename or ''):match('.+[/\\]')
  if not current_dir then
    current_dir = _HOME
  end
  filename =
      gui.dialog('fileselect',
                 '--title', "Insert filename",
                 '--select-multiple',
                 '--with-directory', current_dir)
  if filename then
    filename = filename:gsub('\n', '')
    filename = filename:gsub(current_dir, '')
    if buffer:get_sel_text() == '' then
      buffer:add_text(filename)
    else
      buffer:replace_sel(filename)
    end
  end
end

-- ## Key commands
local keys = _G.keys

-- `Ctrl`+`Alt/⌘`+`Shift`+`O` Insert a filename.
keys.caO = { insert_filename }