From 5234ec01646ef0fb2f93e392c7b3e3937521665a Mon Sep 17 00:00:00 2001
From: Nicolas Boisselier <nicolas.boisselier@gmail.com>
Date: Wed, 3 Jun 2026 09:43:47 +0200
Subject: [PATCH] etc/vim/source/map.vim

---
 etc/vim/source/map.vim | 18 ++++++++++++++----
 1 file changed, 14 insertions(+), 4 deletions(-)

diff --git a/etc/vim/source/map.vim b/etc/vim/source/map.vim
index 77e8540e..8b264a2d 100644
--- a/etc/vim/source/map.vim
+++ b/etc/vim/source/map.vim
@@ -12,6 +12,16 @@
 if !exists("g:MapHelp")
   let g:MapHelp = []
 endif
+
+func!MapHelpAdd(key,lib)
+  for line in g:MapHelp
+    if line[0] == a:key
+      return
+    endif
+  endfor
+  call add(g:MapHelp,[a:key,a:lib])
+endfunc
+
 func!_MapHelpSort(x,y)
 	if (a:x[0] == a:y[0])
 		return 0
@@ -155,19 +165,19 @@ map <C-b> :bp<C-M>
 
 """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
 " F1 - Last Cmd
-call add(MapHelp,['F1, Alt+x','Last shell command executed'])
+call MapHelpAdd('F1, Alt+x','Last shell command executed')
 map <F1> :!<C-UP><C-M>
 map x :!<C-UP><C-M>
 
 """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
 " F2 - Script, formated text verification
-call add(MapHelp,['F2, Alt+c','Check syntaxe'])
+call MapHelpAdd('F2, Alt+c','Check syntaxe')
 map <F2> :call FileCheckSyntaxe()<CR>
 map c  :call FileCheckSyntaxe()<CR>
 
 """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
 " F5 - Comment
-call add(MapHelp,['F5, Alt+m','Add / Delete comment'])
+call MapHelpAdd('F5, Alt+m','Add / Delete comment')
 map <F5> :call CommentNewLine()<CR>
 vmap <F5> :call CommentToggle()<CR>
 map m :call CommentNewLine()<CR>
@@ -175,6 +185,6 @@ vmap m :call CommentToggle()<CR>
 
 """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
 " Alt+h - Help
-call add(MapHelp,['Alt+h','This Help'])
+call MapHelpAdd('Alt+h','This Help')
 map ˙ :call MapHelp()<CR>
 map h :call MapHelp()<CR>
-- 
2.47.3