1
0
Quellcode durchsuchen

[gpn] Add G-95 to fuel names

Innocenty Enikeew vor 6 Jahren
Ursprung
Commit
685885f3ba
1 geänderte Dateien mit 4 neuen und 2 gelöschten Zeilen
  1. 4 2
      plugins/gazprom.lisp

+ 4 - 2
plugins/gazprom.lisp

@@ -58,13 +58,15 @@
   (or (equal name "ДТ+")
       (equal name "Аи-92")
       (equal name "Аи-95")
-      (equal name "Аи-98")))
+      (equal name "Аи-98")
+      (equal name "G-95")))
 
 (defun get-currency (name)
   (cond
     ((or (equal name "Аи-92")
          (equal name "Аи-95")
-         (equal name "Аи-98")) "BENZ")
+         (equal name "Аи-98")
+         (equal name "G-95")) "BENZ")
     ((equal name "ДТ+") "DIZ")
     (t *default-currency*)))