1 files changed, 2 insertions, 1 deletions
diff --git a/account.el b/account.el
index 00c6e61..a39f350 100644
--- a/account.el
+++ b/account.el
@@ -85,7 +85,8 @@ The first capture group is the name of the item.")
 (defvar account-purposes-list
   (list
    "breakfast" "brunch" "brunverage" "lunch"
-   "dinner" "beverage" "snack" "fruit")
+   "dinner" "beverage" "snack" "fruit" "book"
+   "transportation")
   "The list of purposes of accounts.")
 
 (defun account-shop-item-alist ()