- (insert "Petname: " (cdr (assq 'petname pet)) "\n"
- "Owner: " (cdr (assq 'owner pet)) "\n"
- "Pettype: " (cdr (assq 'pettype pet)) "\n"
- "From: " (cdr (assq 'from pet)) "\n"
- "CarryingCount: " (int-to-string (cdr (assq 'carryingcount pet))) "\n"
- "SentYear: " (int-to-string (cdr (assq 'sentyear pet))) "\n"
- "SentMonth: " (int-to-string (cdr (assq 'sentmonth pet))) "\n"
- "SentDay: " (int-to-string (cdr (assq 'sentday pet))) "\n"
- "PetbirthYear: " (int-to-string (cdr (assq 'petbirthyear pet))) "\n"
- "PetbirthMonth: " (int-to-string (cdr (assq 'petbirthmonth pet))) "\n"
- "PetbirthDay: " (int-to-string (cdr (assq 'petbirthday pet))) "\n"
- "Health: " (int-to-string (cdr (assq 'health pet))) "\n"
- "Sex: " (int-to-string (cdr (assq 'sex pet))) "\n"
- "Brain: " (int-to-string (cdr (assq 'brain pet))) "\n"
- "Happiness: " (int-to-string (cdr (assq 'happiness pet))) "\n"
- "Treasure: " (int-to-string (cdr (assq 'treasure pet))) "\n"
- "Money: " (int-to-string (cdr (assq 'money pet))) "\n"
- )
+ (insert
+ "Petname: " (cdr (assq 'petname pet))
+ "\n"
+ "Owner: " (cdr (assq 'owner pet))
+ "\n"
+ "Pettype: " (cdr (assq 'pettype pet))
+ "\n"
+ "From: " (cdr (assq 'from pet))
+ "\n"
+ "CarryingCount: " (int-to-string (cdr (assq 'carryingcount pet)))
+ "\n"
+ "SentYear: " (int-to-string (cdr (assq 'sentyear pet)))
+ "\n"
+ "SentMonth: " (int-to-string (cdr (assq 'sentmonth pet)))
+ "\n"
+ "SentDay: " (int-to-string (cdr (assq 'sentday pet)))
+ "\n"
+ "PetbirthYear: " (int-to-string (cdr (assq 'petbirthyear pet)))
+ "\n"
+ "PetbirthMonth: " (int-to-string (cdr (assq 'petbirthmonth pet)))
+ "\n"
+ "PetbirthDay: " (int-to-string (cdr (assq 'petbirthday pet)))
+ "\n"
+ "Health: " (int-to-string (cdr (assq 'health pet)))
+ "\n"
+ "Sex: " (int-to-string (cdr (assq 'sex pet)))
+ "\n"
+ "Brain: " (int-to-string (cdr (assq 'brain pet)))
+ "\n"
+ "Happiness: " (int-to-string (cdr (assq 'happiness pet)))
+ "\n"
+ "Treasure: " (int-to-string (cdr (assq 'treasure pet)))
+ "\n"
+ "Money: " (int-to-string (cdr (assq 'money pet)))
+ "\n")