cyberweb 0.12.35 → 0.13.11

data/lib/cyberweb/objectified/html_tags/section.rb

@@ -0,0 +1,116 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# === Cyberweb::Objectified::HtmlTags::Section
+# =========================================================================== #
+# require 'cyberweb/objectified/html_tags/section.rb'
+# Cyberweb::Objectified::HtmlTags::Section.new
+# =========================================================================== #
+require 'cyberweb/objectified/html_tags/base.rb'
+
+module Cyberweb
+
+module Objectified::HtmlTags
+
+class Section < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified::HtmlTags::Section
+
+  # ========================================================================= #
+  # === @css_class
+  # ========================================================================= #
+  @css_class = nil
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Section.reset_css_class
+  # ========================================================================= #
+  def self.reset_css_class
+    @css_class = nil
+  end
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Section.set_css_class
+  # ========================================================================= #
+  def self.set_css_class(i = DEFAULT_CSS_CLASS)
+    @css_class = i
+  end
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Section.css_class?
+  # ========================================================================= #
+  def self.css_class?
+    @css_class
+  end
+
+  # ========================================================================= #
+  # === initialize
+  #
+  # Usage example:
+  #
+  #   Cyberweb::Objectified::HtmlTags::Section.new(i)
+  #
+  # ========================================================================= #
+  def initialize(
+      use_this_text      = '',
+      optional_css_class = Section.css_class?,
+      optional_id        = nil,
+      optional_css_style = nil,
+      &block
+    )
+    try_to_register_this_tag(self)
+    reset
+    use_this_text = use_this_text.join(' ').strip if use_this_text.is_a? Array
+    set_content(use_this_text)
+    set_CSS_class(optional_css_class) if optional_css_class
+    set_id(optional_id)               if optional_id
+    set_CSS_style(optional_css_style) if optional_css_style
+    if block_given?
+      evaluate_this_block(&block)
+    end
+  end
+
+  # ========================================================================= #
+  # === reset
+  # ========================================================================= #
+  def reset
+    super()
+  end
+
+  # ========================================================================= #
+  # === rebuild_the_result
+  # ========================================================================= #
+  def rebuild_the_result
+    reset_the_result
+    consider_adding_the_script_entry_from_the_internal_hash
+    consider_adding_the_pre_content
+    append_onto_the_result '<section'
+    batch_append_css_class_then_the_ID_and_then_the_css_style
+    append_onto_the_result ">\n"
+    content = content?
+    if content and !content.empty?
+      append_onto_the_result "#{content}\n"
+    end
+    append_onto_the_result "</section>\n"
+    return raw_result?
+  end
+
+end
+
+end
+
+# =========================================================================== #
+# === Cyberweb::Objectified::HtmlTags::Section
+# =========================================================================== #
+Section = ::Cyberweb::Objectified::HtmlTags::Section
+
+end
+
+# =========================================================================== #
+# Testing the <section> tag next:
+# =========================================================================== #
+if __FILE__ == $PROGRAM_NAME
+  alias e puts
+  _ = Cyberweb::Objectified::HtmlTags::Section.new(
+    'This is for a section-tag.'
+  )
+  e _
+end

data/lib/cyberweb/objectified/html_tags/select.rb

@@ -23,6 +23,39 @@ module Objectified::HtmlTags
 
 class Select < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified::HtmlTags::Select
 
+  # ========================================================================= #
+  # === @css_class
+  # ========================================================================= #
+  @css_class = nil
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Select.reset_css_class
+  # ========================================================================= #
+  def self.reset_css_class
+    @css_class = nil
+  end
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Select.clear
+  # ========================================================================= #
+  def self.clear
+    Select.set_css_class('')
+  end
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Select.set_css_class
+  # ========================================================================= #
+  def self.set_css_class(i = DEFAULT_CSS_CLASS)
+    @css_class = i
+  end
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Select.css_class?
+  # ========================================================================= #
+  def self.css_class?
+    @css_class
+  end
+
   # ========================================================================= #
   # === initialize
   #
@@ -37,7 +70,7 @@ class Select < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified
       optional_id        = nil,
       optional_css_style = nil
     )
-    Cyberweb::Objectified::HtmlTags.try_to_register_this_tag(self)
+    try_to_register_this_tag(self)
     reset
     use_this_text = use_this_text.join(' ').strip if use_this_text.is_a? Array
     set_content(use_this_text)

data/lib/cyberweb/objectified/html_tags/span.rb

@@ -14,6 +14,32 @@ module Objectified::HtmlTags
 
 class Span < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified::HtmlTags::Span
 
+  # ========================================================================= #
+  # === @css_class
+  # ========================================================================= #
+  @css_class = nil
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Span.reset_css_class
+  # ========================================================================= #
+  def self.reset_css_class
+    @css_class = nil
+  end
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Span.set_css_class
+  # ========================================================================= #
+  def self.set_css_class(i = DEFAULT_CSS_CLASS)
+    @css_class = i
+  end
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Span.css_class?
+  # ========================================================================= #
+  def self.css_class?
+    @css_class
+  end
+
   # ========================================================================= #
   # === initialize
   #
@@ -24,11 +50,11 @@ class Span < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified::
   # ========================================================================= #
   def initialize(
       use_this_text      = '',
-      optional_css_class = nil,
+      optional_css_class = Span.css_class?,
       optional_id        = nil,
       optional_css_style = nil
     )
-    Cyberweb::Objectified::HtmlTags.try_to_register_this_tag(self)
+    try_to_register_this_tag(self)
     reset
     use_this_text = use_this_text.join(' ').strip if use_this_text.is_a? Array
     set_content(use_this_text)
@@ -48,8 +74,19 @@ class Span < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified::
     @internal_hash[:alignment] = nil
   end
 
+  # ========================================================================= #
+  # === hint?
+  #
+  # This will become e. g. <span title="My tip">text</span
+  # ========================================================================= #
+  def hint=(i)
+    @internal_hash[:hint] = i
+  end
+
   # ========================================================================= #
   # === align_to_the_left
+  #
+  # This method will align to the left.
   # ========================================================================= # 
   def align_to_the_left
     @internal_hash[:alignment] = :left
@@ -65,6 +102,9 @@ class Span < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified::
     consider_adding_the_pre_content
     append_onto_the_result '<span'
     batch_append_css_class_then_the_ID_and_then_the_css_style
+    if @internal_hash[:hint]
+      append_onto_the_result ' title="'+@internal_hash[:hint].to_s+'"'
+    end
     append_onto_the_result ">\n"
     append_onto_the_result content?.to_s
     append_onto_the_result "\n</span>\n"
@@ -83,13 +123,32 @@ def left_aligned_label(text = '')
 end; alias left_aligned_text left_aligned_label # === left_aligned_text
      alias to_the_left       left_aligned_label # === to_the_left
 
+Span = ::Cyberweb::Objectified::HtmlTags::Span
+
 end
 
 # =========================================================================== #
 # Testing the <span> tag next:
 # =========================================================================== #
 if __FILE__ == $PROGRAM_NAME
-  alias e puts
-  e Cyberweb::Objectified::HtmlTags::Span.new('hey there')
-  e Cyberweb::Objectified::HtmlTags::Span.new('hey there').align_to_the_left
+  require 'colours/colours_e_autoinclude.rb'
+  span = Cyberweb::Objectified::HtmlTags::Span.new('hey there')
+  e ::Colours.tomato(Cyberweb::Objectified::HtmlTags::Span.new('hey there'))
+  e
+  e ::Colours.tomato(Cyberweb::Objectified::HtmlTags::Span.new('hey there').align_to_the_left)
+  e
+  e ::Colours.royalblue(Cyberweb::Objectified::HtmlTags::Span.css_class?)
+  e
+  e span
+  e
+  e 'Setting to the new CSS classes "mars1em" and "BOLD" next:'
+  e
+  Cyberweb::Objectified::HtmlTags::Span.set_css_class('mars1em BOLD')
+  e
+  span = Cyberweb::Objectified::HtmlTags::Span.new('hey there')
+  e span
+  Cyberweb::Objectified::HtmlTags::Span.reset_css_class
+  Cyberweb::Span.set_css_class 'padl5em green'
+  span = Cyberweb::Span.new('hey there')
+  e ::Colours.lightgreen(span)
 end

data/lib/cyberweb/objectified/html_tags/style.rb

@@ -25,7 +25,7 @@ class Style < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified:
   def initialize(
       use_this_text = ''
     )
-    Cyberweb::Objectified::HtmlTags.try_to_register_this_tag(self)
+    try_to_register_this_tag(self)
     reset
     use_this_text = use_this_text.join(' ').strip if use_this_text.is_a? Array
     case use_this_text
@@ -79,7 +79,14 @@ class Style < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified:
     return raw_result?
   end
 
-end; end; end
+end; end
+
+# =========================================================================== #
+# === Cyberweb::Objectified::HtmlTags::Style
+# =========================================================================== #
+Style = ::Cyberweb::Objectified::HtmlTags::Style
+
+end
 
 # =========================================================================== #
 # Testing the <style> tag next:

data/lib/cyberweb/objectified/html_tags/table.rb

@@ -18,6 +18,39 @@ module Objectified::HtmlTags
 
 class Table < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified::HtmlTags::Table
 
+  # ========================================================================= #
+  # === @css_class
+  # ========================================================================= #
+  @css_class = nil
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Table.reset_css_class
+  # ========================================================================= #
+  def self.reset_css_class
+    @css_class = nil
+  end
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Table.clear
+  # ========================================================================= #
+  def self.clear
+    Table.set_css_class('')
+  end; self.instance_eval { alias reset clear } # === Cyberweb::Objectified::HtmlTags::Table.reset 
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Table.set_css_class
+  # ========================================================================= #
+  def self.set_css_class(i = DEFAULT_CSS_CLASS)
+    @css_class = i
+  end
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Table.css_class?
+  # ========================================================================= #
+  def self.css_class?
+    @css_class
+  end
+
   # ========================================================================= #
   # === initialize
   #
@@ -28,11 +61,11 @@ class Table < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified:
   # ========================================================================= #
   def initialize(
       use_this_text      = '',
-      optional_css_class = nil,
+      optional_css_class = Table.css_class?,
       optional_id        = nil,
       optional_css_style = nil
     )
-    Cyberweb::Objectified::HtmlTags.try_to_register_this_tag(self)
+    try_to_register_this_tag(self)
     reset
     set_content(use_this_text) # This should be an Array really.
     set_CSS_class(optional_css_class) if optional_css_class
@@ -87,6 +120,7 @@ class Table < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified:
   def fill_with_this_array(i)
     set_content(i)
   end
+
   # ========================================================================= #
   # === alternate_backgrounds
   # ========================================================================= #
@@ -189,7 +223,107 @@ class Table < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified:
     return raw_result?
   end
 
-end; end; end
+end; end
+
+# =========================================================================== #
+# === Cyberweb::Objectified::HtmlTags::Table
+# =========================================================================== #
+Table = ::Cyberweb::Objectified::HtmlTags::Table
+
+# =========================================================================== #
+# === Table.parse
+# =========================================================================== #
+def Table.parse(*i)
+  ::Cyberweb.parse_table(i)
+end
+
+# =========================================================================== #
+# === Cyberweb::Table.padding=
+#
+# This is an alias towards "bspace", aka the "border-spacing" property.
+# =========================================================================== #
+def Table.padding=(i)
+  Table.set_css_class('bspace'+i.to_s)
+end
+
+# ======================================================================= #
+# === Cyberweb::Table.return_alternate_backgrounds
+#
+# This table will use alternative backgrounds.
+# ======================================================================= #
+def Table.return_alternate_backgrounds(
+    array              = [],
+    optional_css_class = '',
+    &block
+  )
+  _use_this_class_for_even_rows = 'dark_background'
+  _use_this_class_for_odd_rows  = 'light_background'
+  # ===================================================================== #
+  # === Handle blocks next
+  # ===================================================================== #
+  if block_given?
+    yielded = yield
+    if array.empty? and !yielded.empty?
+      array = yielded
+    end
+  end
+  table = Cyberweb::Objectified::HtmlTags::Table.new(optional_css_class)
+  table.alternate_backgrounds(
+    array,
+    optional_css_class
+  )
+  # ========================================================================= #
+  # The old code in October 2021 was the following:
+  #   _ = '<table'.dup
+  #   _ << ::Cyberweb.return_css_class(optional_css_class)
+  #   _ << '>'
+  #   array.each_with_index {|entry, index|
+  #     _ << "<tr>#{N}"
+  #     case index % 2
+  #     when 0
+  #       _ << '<td class="'+use_this_class_for_even_rows+'">'+N
+  #     when 1
+  #       _ << '<td class="'+use_this_class_for_odd_rows+'">'+N
+  #     end
+  #     _ << entry+N
+  #     _ << '</td>'+N
+  #     _ << '</tr>'+N
+  #   }
+  #   _ << '</table>'+N
+  #   return _
+  #
+  # It will be retained for a bit longer in the comment above.
+  # ========================================================================= #
+  return table.to_s
+end
+
+# =========================================================================== #
+# === Cyberweb::Table.enable_padding
+# =========================================================================== #
+def Table.enable_padding # This is supposed to enable padding.
+  Table.set_css_class 'pad15px'
+end
+
+# =========================================================================== #
+# === Cyberweb::Table.alternate_backgrounds
+#
+# Next, define the method Table.alternate_backgrounds().
+#
+# The first argument to this method must be an Array.
+#
+# Usage examples:
+#
+#   Cyberweb::Table.alternate_backgrounds(%w( one two three four ), 'bblack1 pad0_5em')
+#   Table.alternate_backgrounds(%w( one two three four ), 'bblack1 pad0_5em')
+#
+# =========================================================================== #
+def Table.alternate_backgrounds(
+    array, optional_css_class = ''
+  )
+  ee ::Cyberweb::Table.return_alternate_backgrounds(array, optional_css_class)
+end
+
+end
 
 # =========================================================================== #
 # Testing the <table> tag next:

data/lib/cyberweb/objectified/html_tags/td.rb

@@ -0,0 +1,135 @@
+#!/usr/bin/ruby -w
+# Encoding: UTF-8
+# frozen_string_literal: true
+# =========================================================================== #
+# === Cyberweb::Objectified::HtmlTags::Td
+# =========================================================================== #
+# require 'cyberweb/objectified/html_tags/td.rb'
+# x = Cyberweb::Objectified::HtmlTags::Td.new
+# =========================================================================== #
+require 'cyberweb/objectified/html_tags/base.rb'
+
+module Cyberweb
+
+module Objectified::HtmlTags
+
+class Td < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified::HtmlTags::Td
+
+  # ========================================================================= #
+  # === @css_class
+  # ========================================================================= #
+  @css_class = nil
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Td.reset_css_class
+  # ========================================================================= #
+  def self.reset_css_class
+    @css_class = nil
+  end
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Td.clear
+  # ========================================================================= #
+  def self.clear
+    Td.set_css_class('')
+  end; self.instance_eval { alias reset clear } # === Cyberweb::Objectified::HtmlTags::Td.reset
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Td.set_css_class
+  #
+  # To use class Td, do this:
+  #
+  #   Td.set_css_class 'marl1em'
+  #   Td.css_class?
+  #
+  # ========================================================================= #
+  def self.set_css_class(i = DEFAULT_CSS_CLASS)
+    @css_class = i
+  end
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Td.css_class?
+  # ========================================================================= #
+  def self.css_class?
+    @css_class
+  end
+
+  # ========================================================================= #
+  # === initialize
+  #
+  # Usage example:
+  #
+  #   Cyberweb::Objectified::HtmlTags::Td.new(i)
+  #
+  # ========================================================================= #
+  def initialize(
+      use_this_text      = '',
+      optional_css_class = Td.css_class?,
+      optional_id        = nil,
+      optional_css_style = nil
+    )
+    try_to_register_this_tag(self)
+    reset
+    set_content(use_this_text) # This should be an Array really.
+    set_CSS_class(optional_css_class) if optional_css_class
+    set_id(optional_id)               if optional_id
+    set_CSS_style(optional_css_style) if optional_css_style
+  end
+
+  # ========================================================================= #
+  # === reset
+  # ========================================================================= #
+  def reset
+    super()
+  end
+
+  # ========================================================================= #
+  # === rebuild_the_result
+  # ========================================================================= #
+  def rebuild_the_result
+    reset_the_result
+    consider_adding_the_pre_content
+    append_onto_the_result '<td'
+    batch_append_css_class_then_the_ID_and_then_the_css_style
+    append_onto_the_result ">\n"
+    append_the_content
+    append_onto_the_result "</td>\n"
+    return raw_result?
+  end
+
+end; end
+
+# =========================================================================== #
+# === Cyberweb::Objectified::HtmlTags::Td
+# =========================================================================== #
+Td = ::Cyberweb::Objectified::HtmlTags::Td
+
+# ============================================================================ #
+# === Cyberweb::Td.padding=
+#
+# This is an alias towards "bspace", aka the "border-spacing" property.
+# ============================================================================ #
+def Td.padding=(i)
+  Td.set_css_class("bspace#{i}")
+end
+
+end
+
+# =========================================================================== #
+# Testing the <td> tag next:
+# =========================================================================== #
+if __FILE__ == $PROGRAM_NAME
+  # ========================================================================= #
+  # The code that follows next ist mostly test-code:
+  # ========================================================================= #
+  alias e puts
+  require 'colours/autoinclude'
+  e Colours.steelblue("Round 1, testing ... \n")
+  _ = Cyberweb::Objectified::HtmlTags::td.new('OK')
+  _.id = 'hover_transition'
+  _.css_class = 'rounded_border_8px wid100 bblack2'
+  _.css_style = 'font-size: 3.5em'
+  e
+  e _
+  e
+end

data/lib/cyberweb/objectified/html_tags/textarea.rb

@@ -14,6 +14,32 @@ module Objectified::HtmlTags
 
 class Textarea < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectified::HtmlTags::Textarea
 
+  # ========================================================================= #
+  # === @css_class
+  # ========================================================================= #
+  @css_class = nil
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Textarea.reset_css_class
+  # ========================================================================= #
+  def self.reset_css_class
+    @css_class = nil
+  end
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Textarea.set_css_class
+  # ========================================================================= #
+  def self.set_css_class(i = DEFAULT_CSS_CLASS)
+    @css_class = i
+  end
+
+  # ========================================================================= #
+  # === Cyberweb::Objectified::HtmlTags::Textarea.css_class?
+  # ========================================================================= #
+  def self.css_class?
+    @css_class
+  end
+
   # ========================================================================= #
   # === initialize
   #
@@ -24,11 +50,11 @@ class Textarea < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectifi
   # ========================================================================= #
   def initialize(
       use_this_text      = '',
-      optional_css_class = nil,
+      optional_css_class = Textarea.css_class?,
       optional_id        = nil,
       optional_css_style = nil
     )
-    Cyberweb::Objectified::HtmlTags.try_to_register_this_tag(self)
+    try_to_register_this_tag(self)
     reset
     use_this_text = use_this_text.join(' ').strip if use_this_text.is_a? Array
     set_content(use_this_text)
@@ -100,7 +126,11 @@ class Textarea < Cyberweb::Objectified::HtmlTags::Base # === Cyberweb::Objectifi
     return raw_result?
   end
 
-end; end; end
+end; end
+
+Textarea = ::Cyberweb::Objectified::HtmlTags::Textarea
+
+end
 
 # =========================================================================== #
 # Testing <textarea> tag next:
@@ -120,4 +150,8 @@ if __FILE__ == $PROGRAM_NAME
   _.rows = 6
   _.cols = 90
   e _
+  e
+  _ = Cyberweb::Textarea.new('default content')
+  _.id = 'ok_ID'
+  e _
 end