VCS verbessert

git-svn-id: https://vimsuite.svn.sourceforge.net/svnroot/vimsuite/trunk@177 eb2d0018-73a3-4aeb-bfe9-1def61c9ec69

vimfiles.stefan/plugin/basics.vim

@@ -25,6 +25,16 @@ function PrintLine(text)
     echo a:text . line_nr . ' ' . line
 endfunction
 
+function ListToRegexp(list)
+    let groups = []
+    for item in a:list
+        let r = escape(item, '/*.')
+        call add(groups, '\('.r.'\)')
+    endfor
+    let re = join(groups, '\|')
+    return re
+endfunction
+
 command -nargs=1 EchoDebug call EchoDebug(<args>)
 function EchoDebug(text)
     if exists('g:debug')

vimfiles.stefan/plugin/bzr.vim

@@ -24,8 +24,8 @@ command -nargs=0 BZRstudio call s:BZRstudio()
 " ----
 " Menu
 " ----
-let s:BZRMenuLocation = 100
+let s:BZRMenuLocation = '100'
-let s:BZRmenuname = '&BZR.'
+let s:BZRmenuname = '&VCS.&BZR.'
 
 "-------------------------
 function s:BZRRedrawMenu()

vimfiles.stefan/plugin/ccm.vim

@@ -31,7 +31,7 @@ command -nargs=0 CCMhistory    call s:CCMhistory(expand('%:p'))
 " Menu
 " ----
 let s:CCMMenuLocation = 100
-let s:CCMmenuname = '&CCM.'
+let s:CCMmenuname = '&VCS.&CCM.'
 
 "-------------------------
 function s:CCMRedrawMenu()

vimfiles.stefan/plugin/svn.vim

@@ -25,7 +25,7 @@ command -nargs=0 SVNstudio call s:SVNstudio()
 " Menu
 " ----
 let s:SVNMenuLocation = 100
-let s:SVNmenuname = '&SVN.'
+let s:SVNmenuname = '&VCS.&SVN.'
 
 "-------------------------
 function s:SVNRedrawMenu()
@@ -172,7 +172,31 @@ function s:SVNadd(filename)
     let output = system(expression)
     echo output
 endfunction
-"
+
+"-----------------------------
+function SVNgetModifiedFiles()
+"-----------------------------
+    let files = []
+    let expression = g:svn . ' status'
+    let output = system(expression)
+    let lines = split(output, '\n')
+    for line in lines
+        let file   = substitute(line, '^\([AMR]\)......\s*\(\S*\)', '\2', '')
+        if file == line
+            continue
+        endif
+        call add(files, file)
+    endfor
+    return files
+endfunction
+
+"-------------------------------
+function SVNgrepModified(regexp)
+"-------------------------------
+    let files = SVNgetModifiedFiles()
+    let command = 'vimgrep /'.a:regexp.'/g ' . join(files, ' ')
+    execute command
+endfunction
 
 "---------------------
 function s:SVNstudio()

vimfiles.stefan/spell/bmsk.add

@@ -1,4 +1,5 @@
 0pa
+ADP
 ANY
 ASAM
 ASCET
@@ -7,6 +8,8 @@ Abhaengigkeit
 Abschaltpfad
 Abschaltpfads
 Abschaltpfadtest
+Adaptionsgruppe
+Adaptionsgruppen
 Adaptionsgrößen
 Adaptionsvorgänge
 Adaptionswert
@@ -31,6 +34,7 @@ Applikationshinweise
 Applikationslabel
 Applikationsoffset
 Applikationssystem
+Applikationszwecken
 Arbeitspunktberechnung
 Arbeitspunktermittlung
 Arraygröße
@@ -128,6 +132,7 @@ Desc
 Descr
 Diagnosefehlerpfades
 Diagnoseflag
+Diagnosetesters
 Diagnosezaehler
 Dichtekorrekturfaktor
 Divisionsfunktionen
@@ -389,7 +394,9 @@ LWD
 LWDPH
 Labeladdresse
 Labelanzahl
+Labelliste
 Labelnamen
+Lageregelung
 Lambdaregelung
 Lambdasondenheizung
 Lambdawirkungsgrad
@@ -612,7 +619,9 @@ Startmengenadaptionsfaktor
 Startzündwinkel
 Statusrueckmeldungen
 Steigungsüberprüfung
+Steuergeräteinitialisierung
 Steuergerätelayers
+Steuergeräteprogrammstandes
 Strukturdefinitionen
 Stuetzstelle
 Stuetzstellen
@@ -782,6 +791,8 @@ adaptation
 adaption
 adaptx
 add
+adp
+adpini
 aegas
 aevab
 aevabzk
@@ -811,6 +822,7 @@ bdl
 be
 because
 bedaten
+bedatet
 been
 before
 begin
@@ -1246,6 +1258,7 @@ param
 part
 partner
 path
+pdf
 performantere
 pfi
 phys
@@ -1305,6 +1318,7 @@ released
 removed
 removing
 repeat
+report
 request
 requested
 reserved
@@ -1343,6 +1357,7 @@ services
 set
 setSfpErrorZyf
 several
+sg
 shade
 shift
 shiftenden
@@ -1466,6 +1481,7 @@ uint8
 umausc
 unentprellt
 ungewichtet
+unplausibel
 unsigned
 unterlaufsicher
 until
@@ -1555,4 +1571,3 @@ z
 überarbeitungen
 überlaufsicher
 überlaufsichere
-report