DeleteColumn now outputs how many columns have been deleted

chrisbra · Apr 12, 2012 · 01ae80e · 01ae80e
1 parent 15e06e8
commit 01ae80e
Show file tree

Hide file tree

Showing 2 changed files with 11 additions and 3 deletions.
diff --git a/doc/ft-csv.txt b/doc/ft-csv.txt
@@ -1254,7 +1254,7 @@ Alternatively, you can simply call |InitCSV| and ignore the error.
 ==============================================================================
 7. CSV Changelog					       *csv-changelog*
 
-0.24 (unreleased) {{{1
+0.24 Apr 12, 2012 {{{1
 - Allow to transpose the file (|csv-transpose|, suggested by Karan Mistry,
   thanks!)
 - |DeleteColumn_CSV| allows to specify a search pattern and all matching

diff --git a/ftplugin/csv.vim b/ftplugin/csv.vim
@@ -307,14 +307,22 @@ endfu
 fu! <sid>DeleteColumn(arg) "{{{3
     let _wsv = winsaveview()
     if a:arg =~ '^[/]'
+        let i = 0
         let pat = a:arg[1:]
         call cursor(1,1)
         while search(pat, 'cW')
             " Delete matching column
-            call <sid>DelColumn('')
+            sil call <sid>DelColumn('')
+            let i+=1
         endw
     else
-        call <sid>DelColumn(a:arg)
+        let i = 1
+        sil call <sid>DelColumn(a:arg)
+    endif
+    if i > 1
+        call <sid>Warn(printf("%d columns deleted", i))
+    else
+        call <sid>Warn("1 column deleted")
     endif
     call winrestview(_wsv)
 endfu