mirror of https://github.com/akelge/zsh
74 lines
3.5 KiB
VimL
74 lines
3.5 KiB
VimL
|
|
" ViM autocommands for binary plist files
|
|
" Copyright (C) 2005 Moritz Heckscher
|
|
"
|
|
" Note: When a file changes externally and you answer no to vim's question if
|
|
" you want to write anyway, the autocommands (e.g. for BufWritePost) are still
|
|
" executed, it seems, which could have some unwanted side effects.
|
|
"
|
|
" This program is free software; you can redistribute it and/or modify
|
|
" it under the terms of the GNU General Public License as published by
|
|
" the Free Software Foundation; either version 2 of the License, or
|
|
" (at your option) any later version.
|
|
"
|
|
" This program is distributed in the hope that it will be useful,
|
|
" but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
" MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
" GNU General Public License for more details.
|
|
autocmd BufReadPre,FileReadPre *.plist set binary ft=plist syntax=xml
|
|
" ... and call it just after editing a file in a new buffer...
|
|
autocmd BufReadPost *.plist call MyBinaryPlistReadPost()
|
|
" ... or when reading a file into an existing buffer (in that case, don't
|
|
" save as binary later on).
|
|
autocmd FileReadPost *.plist call MyBinaryPlistReadPost() | let b:saveAsBinaryPlist = 0
|
|
autocmd BufWritePre,FileWritePre *.plist call MyBinaryPlistWritePre()
|
|
autocmd BufWritePost,FileWritePost *.plist call MyBinaryPlistWritePost()
|
|
|
|
|
|
" breaking lines etc; since setting this for normal plist files doesn't
|
|
" hurt and it's not yet known whether or not the file to be read is stored
|
|
" in binary format, set the option in any case to be sure).
|
|
" Do it before editing a file in a new buffer and before reading a file
|
|
" into in an existing buffer (using ':read foo.plist').
|
|
|
|
" Define a little function to convert binary files if necessary...
|
|
fun MyBinaryPlistReadPost()
|
|
" Check if the first line just read in indicates a binary plist
|
|
if getline("'[") =~ "^bplist"
|
|
" Filter lines read into buffer (convert to XML with plutil)
|
|
'[,']!plutil -convert xml1 /dev/stdin -o /dev/stdout
|
|
" Many people seem to want to save files originally stored
|
|
" in binary format as such after editing, so memorize format.
|
|
let b:saveAsBinaryPlist = 1
|
|
endif
|
|
" Yeah, plain text (finally or all the way through, either way...)!
|
|
set nobinary
|
|
" Trigger file type detection to get syntax coloring etc. according
|
|
" to file contents (alternative: 'setfiletype xml' to force xml).
|
|
filetype detect
|
|
endfun
|
|
|
|
" Define and use functions for conversion back to binary format
|
|
fun MyBinaryPlistWritePre()
|
|
if exists("b:saveAsBinaryPlist") && b:saveAsBinaryPlist
|
|
" Must set binary mode before conversion (for EOL settings)
|
|
set binary
|
|
" Convert buffer lines to be written to binary
|
|
silent '[,']!plutil -convert binary1 /dev/stdin -o /dev/stdout
|
|
" If there was a problem, e.g. when the file contains syntax
|
|
" errors, undo the conversion and go back to nobinary so the
|
|
" file will be saved in text format.
|
|
if v:shell_error | undo | set nobinary | endif
|
|
endif
|
|
endfun
|
|
fun MyBinaryPlistWritePost()
|
|
" If file was to be written in binary format and there was no error
|
|
" doing the conversion, ...
|
|
if exists("b:saveAsBinaryPlist") && b:saveAsBinaryPlist && !v:shell_error
|
|
" ... undo the conversion and go back to nobinary so the
|
|
" lines are shown as text again in vim.
|
|
undo
|
|
set nobinary
|
|
endif
|
|
endfun
|