+ svg_attrs = options.slice("width", "height", "opacity", :class)
+
+ tag.svg(**svg_attrs) do
+ horizontal = "H#{options['width']}"
+ concat tag.rect(**rect_attrs, **stroke_attrs(options, "border")) if options["fill"] || options["border"]
+ if options["line"]
+ y_middle = format("%g", 0.5 * options["height"])
+ concat tag.path(:d => "M0,#{y_middle} #{horizontal}", **stroke_attrs(options, "line"))
+ end
+ if options["casing"]
+ casing_width = options["casing-width"] || 1
+ y_top = format("%g", 0.5 * casing_width)
+ y_bottom = format("%g", options["height"] - (0.5 * casing_width))
+ concat tag.path(:d => "M0,#{y_top} #{horizontal} M0,#{y_bottom} #{horizontal}", **stroke_attrs(options, "casing"))
+ end
+ end
+ end
+
+ private
+
+ # returns "<" shape if side == -1; ">" if side == 1
+ def adjacent_page_svg_tag(side, **options)
+ count = options[:count] || 1
+ height = options[:height] || 15
+ pad = 2
+ segment = (0.5 * height) - pad
+ width = (segment + (2 * count * pad)).ceil
+ angled_line_data = "l#{side * segment},#{segment} l#{-side * segment},#{segment}"
+ path_data = Array.new(count) { |i| "M#{side * ((2 * i) + 1) * pad},#{pad} #{angled_line_data}" }.join(" ")
+ path_tag = tag.path :d => path_data, :fill => "none", :stroke => "currentColor", :"stroke-width" => 1.5
+ view_box = "#{-width} 0 #{width} #{height}" if side.negative?
+ tag.svg path_tag, :width => width, :height => height, :viewBox => view_box, :class => options[:class]
+ end
+
+ def stroke_attrs(attrs, prefix)
+ attrs.select { |key| key.start_with?(prefix) }.transform_keys { |key| key.delete_prefix(prefix).prepend("stroke") }