Add integration test for customization of options and faces

Author: AdrieanKhisbe

features/emacs-fireplace.feature

@@ -8,7 +8,23 @@ Feature: Putting Emacs on Fire
     Then there is a "*fireplace*" buffer
 
 
-Scenario: Turn on the fire and then off
+  Scenario: Turn on the fire and then off
     When I call "fireplace"
     And  I call "fireplace-off"
     Then I should be in buffer "*scratch*"
+
+  Scenario: I can customize general setting
+    When I try to configure "fireplace"
+    Then I should be in buffer "*Customize Group: Fireplace*"
+    And I should see "Fireplace Background Char"
+    And I should see "Fireplace Buffer Name"
+    And I should see "Fireplace Fury"
+    And I should see "Fireplace Smoke Char"
+
+
+  Scenario: I can customize faces
+    When I try to configure "fireplace-faces"
+    Then I should be in buffer "*Customize Group: Fireplace Faces*"
+    And I should see "Fireplace Inner Flame Face"
+    And I should see "Fireplace Outter Flame Face"
+    And I should see "Fireplace Smoke Face"

features/step-definitions/emacs-fireplace-steps.el

@@ -2,6 +2,11 @@
 ;; files in this directory whose names end with "-steps.el" will be
 ;; loaded automatically by Ecukes.
 
+(When "^I try to configure \"\\([^\"]+\\)\"$"
+      (lambda (group)
+        (shut-up
+         (customize-group group))))
+
 (Then "^there is a \"\\([^\"]+\\)\" buffer$"
       (lambda (buffer-name)
         (get-buffer buffer-name)))

fireplace.el

@@ -63,7 +63,7 @@
   :type 'string :group 'fireplace)
 
 ;;; Faces
-(defgroup fireplace-face nil
+(defgroup fireplace-faces nil
   "Faces for `fireplace'."
   :group 'fireplace)