chore: Use buffer variable to toggle ledger variant differences

Author: alerque

autoload/ledger.vim

@@ -1,4 +1,9 @@
 scriptencoding utf-8
+
+if !exists ('b:is_hledger')
+  let b:is_hledger = g:ledger_is_hledger
+endif
+
 " vim:ts=2:sw=2:sts=2:foldmethod=marker
 function! ledger#transaction_state_toggle(lnum, ...) abort
   if a:0 == 1
@@ -639,7 +644,7 @@ endf
 " Build a ledger command to process the given file.
 function! s:ledger_cmd(file, args) abort
   let l:options = g:ledger_extra_options
-  if len(g:ledger_date_format) > 0 && !g:ledger_is_hledger
+  if len(g:ledger_date_format) > 0 && !b:is_hledger
     let l:options = join([l:options, '--date-format', g:ledger_date_format,
       \ '--input-date-format', g:ledger_date_format])
   endif

compiler/ledger.vim

@@ -19,7 +19,11 @@ if !exists('g:ledger_main')
   let g:ledger_main = '%'
 endif
 
-if !g:ledger_is_hledger
+if !exists ('b:is_hledger')
+  let b:is_hledger = g:ledger_is_hledger
+endif
+
+if !b:is_hledger
 	" Capture Ledger errors (%-C ignores all lines between "While parsing..." and "Error:..."):
 	CompilerSet errorformat=%EWhile\ parsing\ file\ \"%f\"\\,\ line\ %l:,%ZError:\ %m,%-C%.%#
 	" Capture Ledger warnings:

doc/ledger.txt

@@ -279,6 +279,18 @@ behaviour of the ledger filetype.
 
 	let g:ledger_bin = 'ledger'
 
+* Whether to use ledger or hledger specific features. Setting this value is
+  optional and in most coses will be guessed correctly based on g:ledger_bin,
+  but in the event it isn't guessed correctly or you want to use different
+  syntax features even with your default tooling setup for the other engine
+  this flag can be set to override the value.
+
+	let g:ledger_is_hledger = v:true
+
+  A per-buffer variant of this can also be used as an ovrride:
+
+	let b:is_hledger = v:true
+
 * Additional default options for the `ledger` executable:
 
 	let g:ledger_extra_options = ''

spec/syntax.vader

@@ -6,7 +6,7 @@ Given ledger (comment tags):
     b
 
 Before:
-  let g:ledger_is_hledger = 1
+  let b:is_hledger = v:true
 
 Execute (hledger tags):
   " AssertNotEqual SyntaxAt(2, 16), 'ledgerTag'
@@ -20,7 +20,7 @@ Execute (hledger tags):
   " AssertEqual SyntaxAt(3, 30), 'ledgerTagValue'
 
 Before:
-  let g:ledger_is_hledger = 0
+  let b:is_hledger = v:false
 
 Execute (hledger tags):
   " AssertEqual SyntaxAt(2, 14), 'ledgerTag'
@@ -30,7 +30,7 @@ Execute (hledger tags):
 
 
 Before:
-  let g:ledger_is_hledger = 1
+  let b:is_hledger = v:true
   edit spec/hledger-cheatsheet.ledger
 
 Execute (Hledger cheatsheet syntax):

syntax/ledger.vim

@@ -12,7 +12,7 @@ if exists('b:current_syntax')
 endif
 
 if !exists ('b:is_hledger')
-  let b:is_hledger = get(g:, 'ledger_is_hledger', 0) == 1
+  let b:is_hledger = g:ledger_is_hledger
 endif
 
 " Force old regex engine (:help two-engines)