restrict mark names to alphanumeric + underscores

This commit is contained in:
Martin Grenfell 2008-06-06 23:33:01 +12:00
parent 6e60ecfee1
commit 990706b725

View File

@ -2771,6 +2771,11 @@ endfunction
" FUNCTION: s:MarkNode(name) {{{2
" Associate the current node with the given name
function! s:MarkNode(name)
if a:name !~ '^[0-9a-zA-Z_]*$'
call s:Echo("Marks must be named using numbers, letters and underscores only")
return
endif
let currentNode = s:GetSelectedNode()
if currentNode != {}
let marks = s:GetMarks()