Wiki

こういうfunction書いてはじめてfnamemodifyで\と/が自動変換されないことにきづいたまあ意味合い違言うし当然と言えば当然なのかなぁ。

function! GetScriptNum(fileName)
    let scriptNames = filter(split(s:getCmdResult('scriptnames'),'\n')
    \                       , 'fnamemodify(matchstr(v:val, ''^\s*\d\+:\s*\zs.*\ze\s*$''), '':p'')'
    \                               . ' == fnamemodify(a:fileName, '':p'')')
    if !empty(scriptNames)
        return matchstr(scriptNames[0], '^\s*\zs\d\+\ze')
    endif
    return 'unmatch'
endfunction