ultimate-base 0.3.5.0 → 0.4.0.0

data/app/assets/javascripts/ultimate/helpers/record_tag.js.coffee

@@ -1,81 +0,0 @@
-#= require ./base
-#= require ./tag
-
-@Ultimate.Helpers.RecordTag =
-
-  div_for: (record, args...) ->
-    @content_tag_for "div", record, args...
-
-  content_tag_for: (tag_name, single_or_multiple_records, prefix = null, options = null, block = null) ->
-    block = _.outcasts.blockGiven(arguments)
-    if _.isFunction(single_or_multiple_records?.map)
-      single_or_multiple_records.map( (single_record) =>
-        @content_tag_for_single_record(tag_name, single_record, prefix, options, block)
-      ).join("\n")
-    else
-      @content_tag_for_single_record(tag_name, single_or_multiple_records, prefix, options, block)
-
-  content_tag_for_single_record: (tag_name, record, prefix, options, block = null) ->
-    return ''  unless record?
-    [options, prefix] = [prefix, null]  if _.isObject(prefix)
-    block = _.outcasts.blockGiven(arguments)
-    options = if  _.isObject(options) then _.clone(options) else {}
-    _.extend options, {class: Ultimate.Helpers.Tag.concat_class(@dom_class(record, prefix), options['class']), id: @dom_id(record, prefix)}
-    if block
-      Ultimate.Helpers.Tag.content_tag(tag_name, block(record), options, false)
-    else
-      Ultimate.Helpers.Tag.content_tag(tag_name, block, options, false)
-
-
-
-  # from ActionView::ModelNaming
-  model_name_from_record_or_class: (record_or_class) ->
-    modelClass = record_or_class?.constructor ? record_or_class
-    if modelClass?
-      modelClass.modelName or modelClass.className or modelClass.name or 'Model'
-    else
-      'Model'
-
-  # ============= from ActionView::RecordIdentifier ===============
-
-  # The DOM class convention is to use the singular form of an object or class. Examples:
-  #
-  #   dom_class(post)   # => "post"
-  #   dom_class(Person) # => "person"
-  #
-  # If you need to address multiple instances of the same class in the same view, you can prefix the dom_class:
-  #
-  #   dom_class(post, 'edit')   # => "edit_post"
-  #   dom_class(Person, 'edit') # => "edit_person"
-  dom_class: (record_or_class, prefix = "") ->
-    singular =
-      _.result(record_or_class, 'singular') ?
-      _.singularize _.string.underscored(
-        if _.isString(record_or_class)
-          record_or_class
-        else
-          @model_name_from_record_or_class(record_or_class) )
-    if prefix then "#{prefix}_#{singular}" else singular
-
-  # The DOM id convention is to use the singular form of an object or class with the id following an underscore.
-  # If no id is found, prefix with "new_" instead. Examples:
-  #
-  #   dom_id(Post.find(45))       # => "post_45"
-  #   dom_id(new Post)            # => "new_post"
-  #
-  # If you need to address multiple instances of the same class in the same view, you can prefix the dom_id:
-  #
-  #   dom_id(Post.find(45), "edit") # => "edit_post_45"
-  # TODO sync with rorId and ror_id
-  dom_id: (record, prefix = "") ->
-    if record_id = @_record_key_for_dom_id(record)
-      "#{@dom_class(record, prefix)}_#{record_id}"
-    else
-      @dom_class(record, prefix or "new")
-
-
-
-  # protected
-
-  _record_key_for_dom_id: (record) ->
-    record?.id

data/app/assets/javascripts/ultimate/helpers/tag.js.coffee

@@ -1,91 +0,0 @@
-#= require ./base
-
-@Ultimate.Helpers.Tag =
-
-  BOOLEAN_ATTRIBUTES: "disabled readonly multiple checked autobuffer
-                       autoplay controls loop selected hidden scoped async
-                       defer reversed ismap seemless muted required
-                       autofocus novalidate formnovalidate open pubdate itemscope".split(/\s+/)
-
-  PRE_CONTENT_STRINGS:
-    textarea: "\n"
-
-  tag: (tag_name, options = {}, open = false, escape = true) ->
-    "<#{tag_name}#{@tag_options(options, escape)}#{if open then '>' else ' />'}"
-
-  content_tag: (name, content_or_options_with_block = null, options = null, escape = true, block = null) ->
-    if block = _.outcasts.blockGiven(arguments)
-      options = content_or_options_with_block
-      @content_tag_string(name, block(), options, escape)
-    else
-      @content_tag_string(name, content_or_options_with_block, options, escape)
-
-  cdata_section: (content) ->
-    splitted = content.replace(/\]\]>/g, ']]]]><![CDATA[>')
-    "<![CDATA[#{splitted}]]>"
-
-  content_tag_string: (name, content = '', options = {}, escape = true, _escapeContent = escape) ->
-    content = _.string.escapeHTML(content)  if _escapeContent
-    "<#{name}#{@tag_options(options, escape)}>#{@PRE_CONTENT_STRINGS[name] ? ''}#{content}</#{name}>"
-
-  html_options_to_s: (html_options, escape = false, prefix = "") ->
-    deprecate 'html_options_to_s()', "tag_options()"
-    @tag_options arguments...
-
-  tag_options: (options, escape = true) ->
-    return ""  if _.isEmpty(options)
-    attrs = []
-    for key, value of options
-      if key is "data" and _.isObject(value)
-        for k, v of value
-          attrs.push @data_tag_option(k, v, escape)
-      else if _.include(@BOOLEAN_ATTRIBUTES, key)
-        attrs.push @boolean_tag_option(key)  if value
-      else if value?
-        attrs.push @tag_option(key, value, escape)
-    if _.isEmpty(attrs) then "" else " #{attrs.sort().join(' ')}"
-
-  data_tag_option: (key, value, escape) ->
-    key = "data-#{_.string.dasherize(key)}"
-    value = JSON.stringify(value)  if JSON? and _.isObject(value)
-    @tag_option(key, value, escape)
-
-  boolean_tag_option: (key) ->
-    "#{key}=\"#{key}\""
-
-  tag_option: (key, value, escape) ->
-    value = value.join(" ")  if _.isArray(value)
-    value = _.string.escapeHTML(value)  if escape
-    "#{key}=\"#{value}\""
-
-  concat_class: ->
-    flatten_classes = _.filter( _.flatten(arguments), (e) -> _.isString(e) ).join(' ')
-    _.uniq( _.string.words(flatten_classes) ).join(' ')
-
-
-
-  selfClosedTags: _.string.words('area base br col command embed hr img input keygen link meta param source track wbr')
-
-  # Generate html from zen-selector. Ninja tool.
-  # TODO more zen features: +, *x, {content}
-  # TODO cache
-  selectorToHtml: (selector) ->
-    if matches = selector.match(/^[\s>]*([\w\-\.#]+)(.*)$/)
-      selector = matches[1]
-      continuation = matches[2]   # in v1 {(if continuation then ">" + content else " />")}
-      tag_name = selector.match(/^\w+/)?[0] or 'div'
-      id = selector.match(/#([\w\-]+)/)?[1]
-      classes = _.map( selector.match(/\.[\w\-]+/g), (c) -> _.string.ltrim(c, '.') )
-      html_options = {}
-      html_options['id'] = id  if id
-      html_options['class'] = classes.join(' ')  if classes.length
-      if _.contains(@selfClosedTags, tag_name)
-        @tag(tag_name, html_options)
-      else
-        continuation = @selectorToHtml(continuation)  if continuation
-        @content_tag(tag_name, continuation, html_options)
-#    else if matches = selector.match(/^\s*\+\s*(.*)$/)       # /^\s*\+\s*([\w\.#]+)(.*)$/)
-#      continuation = matches[1]
-#      if continuation then @selectorToHtml(continuation) else continuation
-    else
-      ''

data/app/assets/javascripts/ultimate/helpers/url.js.coffee

@@ -1,152 +0,0 @@
-#= require ./base
-#= require ./tag
-#= require ./javascript
-
-__char_encode = (char) -> "%#{char.charCodeAt(0).toString(16)}"
-__escape_path = (str) -> str.replace(/[^*\-.0-9A-Z_a-z]/g, __char_encode).replace(/\+/g, '%20')
-__string_encode = (str) -> _.map(str, (char) -> "&##{char.charCodeAt(0)};" ).join('')
-
-@Ultimate.Helpers.Url =
-
-  url_for: (options = null) ->
-    if _.isString(options)
-      if options is 'back'
-        'javascript:history.back();'
-      else
-        options
-    else unless _.isEmpty(options)
-      url = _.result(options, 'url') ? ''
-      if $.isPlainObject(options)
-        options = _.clone(options)
-        delete options['url']
-        anchor = _.outcasts.delete(options, 'anchor')
-        url += "?#{_.map(options, (value, key) -> "#{key}=#{value}").sort().join('&')}"  unless _.isEmpty(options)
-        url += "##{anchor}"  if anchor
-      url
-    else
-      'javascript:;'
-
-  link_to: (name = null, options = null, html_options = null, block = null) ->
-    [html_options, options] = [options, name]  if block = _.outcasts.blockGiven(arguments)
-    options ||= {}
-    url = @url_for(options)
-    html_options = @_convert_options_to_data_attributes(options, html_options)
-    html_options['href'] ||= url
-    if block
-      Ultimate.Helpers.Tag.content_tag('a', html_options, null, false, block)
-    else
-      Ultimate.Helpers.Tag.content_tag('a', name ? url, html_options, false)
-
-  link_to_js: (name = null, html_options = null, block = null) ->
-    [options, name] = [name, null]  if block = _.outcasts.blockGiven(arguments)
-    @link_to [name, options, html_options, block]...
-
-  # TODO tests
-  link_to_unless_current_span: (name, options = null, html_options = null, block = null) ->
-    [html_options, options] = [options, name]  if block = _.outcasts.blockGiven(arguments)
-    url = @url_for(options)
-    if @current_page_(url)
-      if block
-        Ultimate.Helpers.Tag.content_tag('span', html_options, null, false, block)
-      else
-        Ultimate.Helpers.Tag.content_tag('span', name ? url, html_options, false)
-    else
-      if block
-        @link_to options, html_options, block
-      else
-        @link_to name, options, html_options
-
-  # TODO tests
-  link_to_unless_current: (name, options = {}, html_options = {}, block = null) ->
-    @link_to_unless @current_page_(options), name, options, html_options, block
-
-  # TODO tests
-  link_to_unless: (condition, name, options = {}, html_options = {}, block = null) ->
-    if condition
-      if block = _.outcasts.blockGiven(arguments)
-        block(name, options, html_options)
-      else
-        name
-    else
-      @link_to name, options, html_options, block
-
-  # TODO tests
-  link_to_if: (condition, name, options = {}, html_options = {}, block = null) ->
-    @link_to_unless not condition, name, options, html_options, block
-
-  mail_to: (email_address, name = null, html_options = {}) ->
-    email_address = _.string.escapeHTML(email_address)
-    encode = _.outcasts.delete(html_options, 'encode')
-    extras = _.compact _.map _.string.words('cc bcc body subject'), (item) ->
-      option = _.outcasts.delete(html_options, item)
-      if option?
-        "#{item}=#{__escape_path(option)}"
-    extras = if _.isEmpty(extras) then '' else '?' + _.string.escapeHTML(extras.join('&'))
-    email_address_obfuscated = email_address
-    email_address_obfuscated = email_address_obfuscated.replace('@', _.outcasts.delete(html_options, 'replace_at'))   if 'replace_at' of html_options
-    email_address_obfuscated = email_address_obfuscated.replace('.', _.outcasts.delete(html_options, 'replace_dot'))  if 'replace_dot' of html_options
-    switch encode
-      when 'javascript'
-        html   = @link_to(name or email_address_obfuscated, "mailto:#{email_address}#{extras}", html_options)
-        html   = Ultimate.Helpers.Javascript.escape_javascript(html)
-        string = _.map("document.write('#{html}');", __char_encode).join('')
-        "<script>eval(decodeURIComponent('#{string}'))</script>"
-      when 'hex'
-        email_address_encoded = __string_encode(email_address_obfuscated)
-        string = __string_encode('mailto:') + _.map(email_address, (char) -> if /\w/.test(char) then __char_encode(char) else char).join('')
-        @link_to name or email_address_encoded, "#{string}#{extras}", html_options
-      else
-        @link_to name or email_address_obfuscated, "mailto:#{email_address}#{extras}", html_options
-
-  # TODO tests
-  current_page_: (options) ->
-    url_string = @url_for(options)
-    request_uri = location.pathname
-    if /^\w+:\/\//.test(url_string)
-      url_string == "#{location.protocol}#{location.host}#{request_uri}"
-    else
-      url_string == request_uri
-
-
-
-  _convert_options_to_data_attributes: (options, html_options) ->
-    if html_options
-      html_options['data-remote'] = 'true'  if @_link_to_remote_options(options) or @_link_to_remote_options(html_options)
-      method = _.outcasts.delete(html_options, 'method')
-      @_add_method_to_attributes(html_options, method)  if method
-      html_options
-    else
-      if @_link_to_remote_options(options) then {'data-remote': 'true'} else {}
-
-  _link_to_remote_options: (options) ->
-    _.isObject(options) and _.outcasts.delete(options, 'remote')
-
-  _add_method_to_attributes: (html_options, method) ->
-    if _.isString(method) and method.toLowerCase() isnt 'get' and not /nofollow/.test(html_options['rel'])
-      html_options['rel'] = Ultimate.Helpers.Tag.concat_class(html_options['rel'], 'nofollow')
-    html_options['data-method'] = method
-
-  _convert_boolean_attributes: (html_options, bool_attrs) ->
-    html_options[x] = x  for x in bool_attrs  when _.outcasts.delete(html_options, x)
-    html_options
-
-  __protect_against_forgery: false
-  __request_forgery_protection_token: 'form_token'
-  __form_authenticity_token: 'secret'
-
-  __init_request_forgery_protection: ->
-    param = $('head meta[name="csrf-param"]').attr('content')
-    token = $('head meta[name="csrf-token"]').attr('content')
-    if param and token
-      @__protect_against_forgery = true
-      @__request_forgery_protection_token = param
-      @__form_authenticity_token = token
-
-  _token_tag: (token = @__form_authenticity_token) ->
-    if token isnt false and @__protect_against_forgery
-      Ultimate.Helpers.Tag.tag 'input', type: 'hidden', name: @__request_forgery_protection_token, value: token
-    else
-      ''
-
-  _method_tag: (method) ->
-    Ultimate.Helpers.Tag.tag 'input', type: 'hidden', name: '_method', value: method

data/test/javascripts/tests/helpers/asset_tag_test.js.coffee

@@ -1,51 +0,0 @@
-#= require ultimate/underscore/underscore
-#= require ultimate/underscore/underscore.string
-#= require ultimate/helpers/asset_tag
-
-module "Ultimate.Helpers.AssetTag"
-
-_.extend @, Ultimate.Helpers.AssetTag
-
-test "favicon_link_tag", ->
-  equal favicon_link_tag(), '<link href="/images/favicon.ico" rel="shortcut icon" type="image/vnd.microsoft.icon" />'
-  equal favicon_link_tag('favicon.ico'), '<link href="/images/favicon.ico" rel="shortcut icon" type="image/vnd.microsoft.icon" />'
-  equal favicon_link_tag('favicon.ico', rel: 'foo'), '<link href="/images/favicon.ico" rel="foo" type="image/vnd.microsoft.icon" />'
-  equal favicon_link_tag('favicon.ico', rel: 'foo', type: 'bar'), '<link href="/images/favicon.ico" rel="foo" type="bar" />'
-  equal favicon_link_tag('mb-icon.png', rel: 'apple-touch-icon', type: 'image/png'), '<link href="/images/mb-icon.png" rel="apple-touch-icon" type="image/png" />'
-
-test "image_path", ->
-  equal image_path(""), ''
-  equal image_path("xml"), '/images/xml'
-  equal image_path("xml.png"), '/images/xml.png'
-  equal image_path("dir/xml.png"), '/images/dir/xml.png'
-  equal image_path("/dir/xml.png"), '/dir/xml.png'
-
-test "path_to_image", ->
-  equal path_to_image(""), ''
-  equal path_to_image("xml"), '/images/xml'
-  equal path_to_image("xml.png"), '/images/xml.png'
-  equal path_to_image("dir/xml.png"), '/images/dir/xml.png'
-  equal path_to_image("/dir/xml.png"), '/dir/xml.png'
-
-test "image_alt", ->
-  for prefix in ['', '/', '/foo/bar/', 'foo/bar/']
-    equal image_alt("#{prefix}rails.png"), 'Rails'
-    equal image_alt("#{prefix}rails-9c0a079bdd7701d7e729bd956823d153.png"), 'Rails'
-    equal image_alt("#{prefix}avatar-0000.png"), 'Avatar-0000'
-
-test "image_tag", ->
-  equal image_tag("xml.png"), '<img alt="Xml" src="/images/xml.png" />'
-  equal image_tag("rss.gif", alt: "rss syndication"), '<img alt="rss syndication" src="/images/rss.gif" />'
-  equal image_tag("gold.png", size: "20"), '<img alt="Gold" height="20" src="/images/gold.png" width="20" />'
-  equal image_tag("gold.png", size: "45x70"), '<img alt="Gold" height="70" src="/images/gold.png" width="45" />'
-  equal image_tag("gold.png", size: "45x70"), '<img alt="Gold" height="70" src="/images/gold.png" width="45" />'
-  equal image_tag("error.png", size: "45 x 70"), '<img alt="Error" src="/images/error.png" />'
-  equal image_tag("error.png", size: "x"), '<img alt="Error" src="/images/error.png" />'
-  equal image_tag("google.com.png"), '<img alt="Google.com" src="/images/google.com.png" />'
-  equal image_tag("slash..png"), '<img alt="Slash." src="/images/slash..png" />'
-  equal image_tag(".pdf.png"), '<img alt=".pdf" src="/images/.pdf.png" />'
-  equal image_tag("http://www.rubyonrails.com/images/rails.png"), '<img alt="Rails" src="http://www.rubyonrails.com/images/rails.png" />'
-  equal image_tag("//www.rubyonrails.com/images/rails.png"), '<img alt="Rails" src="//www.rubyonrails.com/images/rails.png" />'
-  equal image_tag("mouse.png", alt: null), '<img src="/images/mouse.png" />'
-  equal image_tag("data:image/gif;base64,R0lGODlhAQABAID/AMDAwAAAACH5BAEAAAAALAAAAAABAAEAAAICRAEAOw==", alt: null), '<img src="data:image/gif;base64,R0lGODlhAQABAID/AMDAwAAAACH5BAEAAAAALAAAAAABAAEAAAICRAEAOw==" />'
-  equal image_tag(""), '<img src="" />'

data/test/javascripts/tests/helpers/form_options_test.js.coffee

@@ -1,170 +0,0 @@
-#= require ultimate/underscore/underscore
-#= require ultimate/underscore/underscore.string
-#= require ultimate/underscore/underscore.outcasts
-#= require ultimate/backbone/lib/backbone
-#= require ultimate/helpers/form_options
-
-module "Ultimate.Helpers.FormOptions"
-
-_.extend @, Ultimate.Helpers.FormOptions
-
-test "options_for_select", ->
-  options = '<option value="Denmark">Denmark</option><option value="USA">USA</option><option value="Sweden">Sweden</option>'
-  equal options_for_select(options), options
-  equal options_for_select([ "<Denmark>", "USA", "Sweden" ]),
-        "<option value=\"&lt;Denmark&gt;\">&lt;Denmark&gt;</option>\n<option value=\"USA\">USA</option>\n<option value=\"Sweden\">Sweden</option>"
-  equal options_for_select([ "Denmark", "<USA>", "Sweden" ], "<USA>"),
-        "<option value=\"Denmark\">Denmark</option>\n<option selected=\"selected\" value=\"&lt;USA&gt;\">&lt;USA&gt;</option>\n<option value=\"Sweden\">Sweden</option>"
-  equal options_for_select([ "Denmark", "<USA>", "Sweden" ], [ "<USA>", "Sweden" ]),
-        "<option value=\"Denmark\">Denmark</option>\n<option selected=\"selected\" value=\"&lt;USA&gt;\">&lt;USA&gt;</option>\n<option selected=\"selected\" value=\"Sweden\">Sweden</option>"
-  equal options_for_select([ "Denmark", "<USA>", "Sweden" ], disabled: "<USA>"),
-        "<option value=\"Denmark\">Denmark</option>\n<option disabled=\"disabled\" value=\"&lt;USA&gt;\">&lt;USA&gt;</option>\n<option value=\"Sweden\">Sweden</option>"
-  equal options_for_select([ "Denmark", "<USA>", "Sweden" ], disabled: ["<USA>", "Sweden"]),
-        "<option value=\"Denmark\">Denmark</option>\n<option disabled=\"disabled\" value=\"&lt;USA&gt;\">&lt;USA&gt;</option>\n<option disabled=\"disabled\" value=\"Sweden\">Sweden</option>"
-  equal options_for_select([ "Denmark", "<USA>", "Sweden" ], selected: "Denmark", disabled: "<USA>"),
-        "<option selected=\"selected\" value=\"Denmark\">Denmark</option>\n<option disabled=\"disabled\" value=\"&lt;USA&gt;\">&lt;USA&gt;</option>\n<option value=\"Sweden\">Sweden</option>"
-  equal options_for_select([ true, false ], selected: false, disabled: null),
-        "<option value=\"true\">true</option>\n<option selected=\"selected\" value=\"false\">false</option>"
-  equal options_for_select([1..3]),
-        "<option value=\"1\">1</option>\n<option value=\"2\">2</option>\n<option value=\"3\">3</option>"
-  equal options_for_select([ "ruby", "rubyonrails" ], "rubyonrails"),
-        "<option value=\"ruby\">ruby</option>\n<option selected=\"selected\" value=\"rubyonrails\">rubyonrails</option>"
-  equal options_for_select([ "ruby", "rubyonrails" ], "ruby"),
-        "<option selected=\"selected\" value=\"ruby\">ruby</option>\n<option value=\"rubyonrails\">rubyonrails</option>"
-  equal options_for_select([ "ruby", "rubyonrails", null ], "ruby"),
-        "<option selected=\"selected\" value=\"ruby\">ruby</option>\n<option value=\"rubyonrails\">rubyonrails</option>\n<option value=\"\"></option>"
-  equal options_for_select("$": "Dollar", "<DKR>": "<Kroner>"),
-        "<option value=\"Dollar\">$</option>\n<option value=\"&lt;Kroner&gt;\">&lt;DKR&gt;</option>"
-  equal options_for_select({ "$": "Dollar", "<DKR>": "<Kroner>" }, "Dollar"),
-        "<option selected=\"selected\" value=\"Dollar\">$</option>\n<option value=\"&lt;Kroner&gt;\">&lt;DKR&gt;</option>"
-  equal options_for_select({ "$": "Dollar", "<DKR>": "<Kroner>" }, [ "Dollar", "<Kroner>" ]),
-        "<option selected=\"selected\" value=\"Dollar\">$</option>\n<option selected=\"selected\" value=\"&lt;Kroner&gt;\">&lt;DKR&gt;</option>"
-  equal options_for_select([ [ "<Denmark>", { class: 'bold' } ], [ "USA", { onclick: "alert('Hello World');" } ], [ "Sweden" ], "Germany" ]),
-        "<option class=\"bold\" value=\"&lt;Denmark&gt;\">&lt;Denmark&gt;</option>\n<option onclick=\"alert(&apos;Hello World&apos;);\" value=\"USA\">USA</option>\n<option value=\"Sweden\">Sweden</option>\n<option value=\"Germany\">Germany</option>"
-  equal options_for_select([ [ "<Denmark>", { data: { test: 'bold' } } ] ]),
-        "<option data-test=\"bold\" value=\"&lt;Denmark&gt;\">&lt;Denmark&gt;</option>"
-  equal options_for_select([ [ "<Denmark>", { data: { test: '<bold>' } } ] ]),
-        "<option data-test=\"&lt;bold&gt;\" value=\"&lt;Denmark&gt;\">&lt;Denmark&gt;</option>"
-  equal options_for_select([ "<Denmark>", [ "USA", { class: 'bold' } ], "Sweden" ], "USA"),
-        "<option value=\"&lt;Denmark&gt;\">&lt;Denmark&gt;</option>\n<option class=\"bold\" selected=\"selected\" value=\"USA\">USA</option>\n<option value=\"Sweden\">Sweden</option>"
-  equal options_for_select([ "<Denmark>", [ "USA", { class: 'bold' } ], "Sweden" ], [ "USA", "Sweden" ]),
-        "<option value=\"&lt;Denmark&gt;\">&lt;Denmark&gt;</option>\n<option class=\"bold\" selected=\"selected\" value=\"USA\">USA</option>\n<option selected=\"selected\" value=\"Sweden\">Sweden</option>"
-  equal options_for_select([ [ "<Denmark>", { onclick: 'alert("<code>")' } ] ]),
-        "<option onclick=\"alert(&quot;&lt;code&gt;&quot;)\" value=\"&lt;Denmark&gt;\">&lt;Denmark&gt;</option>"
-
-
-
-class Struct
-  constructor: ->
-    for key, index in @constructor.keys
-      @[key] = arguments[index] ? null
-
-class Post extends Struct
-  @keys = ['title', 'author_name', 'body', 'secret', 'written_on', 'category', 'origin', 'allow_comments']
-
-dummy_posts =
-  [ new Post("<Abe> went home", "<Abe>", "To a little house", "shh!"),
-    new Post("Babe went home", "Babe", "To a little house", "shh!"),
-    new Post("Cabe went home", "Cabe", (-> "To a little house"), (-> "shh!")) ]
-
-test "options_from_collection_for_select", ->
-  equal options_from_collection_for_select(dummy_posts, "author_name", "title"),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option value=\"Babe\">Babe went home</option>\n<option value=\"Cabe\">Cabe went home</option>"
-  equal options_from_collection_for_select(dummy_posts, "author_name", "title", "Babe"),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option selected=\"selected\" value=\"Babe\">Babe went home</option>\n<option value=\"Cabe\">Cabe went home</option>"
-  equal options_from_collection_for_select(dummy_posts, "author_name", "title", [ "Babe", "Cabe" ]),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option selected=\"selected\" value=\"Babe\">Babe went home</option>\n<option selected=\"selected\" value=\"Cabe\">Cabe went home</option>"
-  equal options_from_collection_for_select(dummy_posts, "author_name", "title", (p) -> p.author_name is 'Babe'),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option selected=\"selected\" value=\"Babe\">Babe went home</option>\n<option value=\"Cabe\">Cabe went home</option>"
-  equal options_from_collection_for_select(dummy_posts, "author_name", "title", disabled: "Babe"),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option disabled=\"disabled\" value=\"Babe\">Babe went home</option>\n<option value=\"Cabe\">Cabe went home</option>"
-  equal options_from_collection_for_select(dummy_posts, "author_name", "title", disabled: [ "Babe", "Cabe" ]),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option disabled=\"disabled\" value=\"Babe\">Babe went home</option>\n<option disabled=\"disabled\" value=\"Cabe\">Cabe went home</option>"
-  equal options_from_collection_for_select(dummy_posts, "author_name", "title", selected: "Cabe", disabled: "Babe"),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option disabled=\"disabled\" value=\"Babe\">Babe went home</option>\n<option selected=\"selected\" value=\"Cabe\">Cabe went home</option>"
-  equal options_from_collection_for_select(dummy_posts, "author_name", "title", disabled: (p) -> p.author_name in ['Babe', 'Cabe']),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option disabled=\"disabled\" value=\"Babe\">Babe went home</option>\n<option disabled=\"disabled\" value=\"Cabe\">Cabe went home</option>"
-  equal options_from_collection_for_select(dummy_posts, ((p) -> p.author_name), "title"),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option value=\"Babe\">Babe went home</option>\n<option value=\"Cabe\">Cabe went home</option>"
-  equal options_from_collection_for_select(dummy_posts, "author_name", (p) -> p.title),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option value=\"Babe\">Babe went home</option>\n<option value=\"Cabe\">Cabe went home</option>"
-
-
-
-_objectsArrayToHashesArray = (objectsArray) ->
-  _.map objectsArray, (element) ->
-    hash = {}
-    for key in element.constructor.keys
-      hash[key] = element[key]
-    hash
-
-test "options_from_collection_for_select with array of hashes", ->
-  equal options_from_collection_for_select(_objectsArrayToHashesArray(dummy_posts), "author_name", "title", "Babe"),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option selected=\"selected\" value=\"Babe\">Babe went home</option>\n<option value=\"Cabe\">Cabe went home</option>"
-
-
-
-class BBPost extends Backbone.Model
-
-class BBPosts extends Backbone.Collection
-  model: BBPost
-
-test "options_from_collection_for_select with Backbone.Collection", ->
-  bbPosts = new BBPosts(_objectsArrayToHashesArray(dummy_posts))
-  equal options_from_collection_for_select(bbPosts, "author_name", "title", "Babe"),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option selected=\"selected\" value=\"Babe\">Babe went home</option>\n<option value=\"Cabe\">Cabe went home</option>"
-  equal options_from_collection_for_select(bbPosts, "author_name", "title", disabled: (p) -> p.get('author_name') in ['Babe', 'Cabe']),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option disabled=\"disabled\" value=\"Babe\">Babe went home</option>\n<option disabled=\"disabled\" value=\"Cabe\">Cabe went home</option>"
-  equal options_from_collection_for_select(bbPosts, ((p) -> p.get('author_name')), "title"),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option value=\"Babe\">Babe went home</option>\n<option value=\"Cabe\">Cabe went home</option>"
-  equal options_from_collection_for_select(bbPosts, "author_name", (p) -> p.get('title')),
-        "<option value=\"&lt;Abe&gt;\">&lt;Abe&gt; went home</option>\n<option value=\"Babe\">Babe went home</option>\n<option value=\"Cabe\">Cabe went home</option>"
-
-
-
-class Continent extends Struct
-  @keys = ['continent_name', 'countries']
-
-class Country extends Struct
-  @keys = ['country_id', 'country_name']
-
-dummy_continents =
-  [ new Continent("<Africa>", [new Country("<sa>", "<South Africa>"), new Country("so", "Somalia")]),
-    new Continent("Europe", [new Country("dk", "Denmark"), new Country("ie", "Ireland")]) ]
-
-test "option_groups_from_collection_for_select", ->
-  equal option_groups_from_collection_for_select(dummy_continents, "countries", "continent_name", "country_id", "country_name", "dk"),
-        "<optgroup label=\"&lt;Africa&gt;\"><option value=\"&lt;sa&gt;\">&lt;South Africa&gt;</option>\n<option value=\"so\">Somalia</option></optgroup><optgroup label=\"Europe\"><option selected=\"selected\" value=\"dk\">Denmark</option>\n<option value=\"ie\">Ireland</option></optgroup>"
-
-
-
-class BBContinent extends Backbone.Model
-
-class BBContinents extends Backbone.Collection
-  model: BBContinent
-
-test "option_groups_from_collection_for_select with Backbone.Collection", ->
-  BBContinents = new BBContinents(_objectsArrayToHashesArray(dummy_continents))
-  equal option_groups_from_collection_for_select(dummy_continents, "countries", "continent_name", "country_id", "country_name", "dk"),
-        "<optgroup label=\"&lt;Africa&gt;\"><option value=\"&lt;sa&gt;\">&lt;South Africa&gt;</option>\n<option value=\"so\">Somalia</option></optgroup><optgroup label=\"Europe\"><option selected=\"selected\" value=\"dk\">Denmark</option>\n<option value=\"ie\">Ireland</option></optgroup>"
-
-
-
-test "grouped_options_for_select", ->
-  equal grouped_options_for_select([
-          ["North America",
-            [['United States','US'],"Canada"]],
-          ["Europe",
-            [["Great Britain","GB"], "Germany"]]
-          ]),
-        "<optgroup label=\"North America\"><option value=\"US\">United States</option>\n<option value=\"Canada\">Canada</option></optgroup><optgroup label=\"Europe\"><option value=\"GB\">Great Britain</option>\n<option value=\"Germany\">Germany</option></optgroup>"
-  equal grouped_options_for_select([['US',"Canada"] , ["GB", "Germany"]], null, divider: "----------"),
-        "<optgroup label=\"----------\"><option value=\"US\">US</option>\n<option value=\"Canada\">Canada</option></optgroup><optgroup label=\"----------\"><option value=\"GB\">GB</option>\n<option value=\"Germany\">Germany</option></optgroup>"
-  equal grouped_options_for_select([["Hats", ["Baseball Cap","Cowboy Hat"]]], "Cowboy Hat", prompt: "Choose a product..."),
-        "<option value=\"\">Choose a product...</option><optgroup label=\"Hats\"><option value=\"Baseball Cap\">Baseball Cap</option>\n<option selected=\"selected\" value=\"Cowboy Hat\">Cowboy Hat</option></optgroup>"
-  equal grouped_options_for_select([["Hats", ["Baseball Cap","Cowboy Hat"]]], "Cowboy Hat", prompt: true),
-        "<option value=\"\">Please select</option><optgroup label=\"Hats\"><option value=\"Baseball Cap\">Baseball Cap</option>\n<option selected=\"selected\" value=\"Cowboy Hat\">Cowboy Hat</option></optgroup>"
-  equal grouped_options_for_select([["Hats", ["Baseball Cap","Cowboy Hat"]]], null, prompt: '<Choose One>'),
-        "<option value=\"\">&lt;Choose One&gt;</option><optgroup label=\"Hats\"><option value=\"Baseball Cap\">Baseball Cap</option>\n<option value=\"Cowboy Hat\">Cowboy Hat</option></optgroup>"
-  equal grouped_options_for_select({'North America': ['United States','Canada'], 'Europe': ['Denmark','Germany']}),
-        "<optgroup label=\"Europe\"><option value=\"Denmark\">Denmark</option>\n<option value=\"Germany\">Germany</option></optgroup><optgroup label=\"North America\"><option value=\"United States\">United States</option>\n<option value=\"Canada\">Canada</option></optgroup>"