update packages
This commit is contained in:
@@ -31,7 +31,7 @@
|
||||
"The version of ledger executable needed for interactive features.")
|
||||
|
||||
(defvar ledger-works nil
|
||||
"Flag showing whether the ledger binary can support `ledger-mode' interactive features.")
|
||||
"Non-nil if the ledger binary can support `ledger-mode' interactive features.")
|
||||
|
||||
(defgroup ledger-exec nil
|
||||
"Interface to the Ledger command-line accounting program."
|
||||
@@ -89,6 +89,7 @@ otherwise the error output is displayed and an error is raised."
|
||||
(apply #'call-process-region
|
||||
(append (list (point-min) (point-max)
|
||||
ledger-binary-path nil (list outbuf errfile) nil "-f" "-")
|
||||
(list "--date-format" ledger-default-date-format)
|
||||
args)))))
|
||||
(if (ledger-exec-success-p exit-code outbuf)
|
||||
outbuf
|
||||
|
||||
Reference in New Issue
Block a user