feat(dsfr): improuve vertical card component

app/components/dsfr/card_vertical_component.rb

@@ -1,10 +1,12 @@
 class Dsfr::CardVerticalComponent < ApplicationComponent
   renders_many :footer_buttons
 
-  attr_reader :title, :desc
+  attr_reader :title, :desc, :tags, :error
 
-  def initialize(title: nil, desc: nil)
+  def initialize(title: nil, desc: nil, tags: nil, error: nil)
     @title = title
     @desc = desc
+    @tags = tags
+    @error = error
   end
 end

app/components/dsfr/card_vertical_component/card_vertical_component.html.haml

@@ -7,6 +7,16 @@
       - if desc
         %p.fr-card__desc
           = desc
+      .fr-card__start
+        - if tags
+          %ul.fr-tags-group
+            - tags.each do |tag|
+              %li
+                %p.fr-tag=tag
+      .fr-card__end
+        - if error
+          .fr-card__detail.fr-alert.fr-alert--error
+            %p=error
 
     - if footer_buttons?
       .fr-card__footer