1
0
Просмотр исходного кода

[ledger] add CZK to manual entry

Innokentiy Enikeev 7 лет назад
Родитель
Сommit
372dd663f6
1 измененных файлов с 1 добавлено и 1 удалено
  1. 1 1
      plugins/ledger.lisp

+ 1 - 1
plugins/ledger.lisp

@@ -327,7 +327,7 @@
                   (pta-ledger:posting-account budget) (pta-ledger:posting-account last-budget))))))
                   (pta-ledger:posting-account budget) (pta-ledger:posting-account last-budget))))))
     entry))
     entry))
 
 
-(def-message-cmd-handler handler-create (:rub :usd :eur :thb :btc)
+(def-message-cmd-handler handler-create (:rub :usd :eur :thb :btc :czk)
   (cond
   (cond
     ((>= (length args) 2)
     ((>= (length args) 2)
      (ledger/new-chat-entry chat-id (create-entry chat-id
      (ledger/new-chat-entry chat-id (create-entry chat-id