terom@13: /*  Prototype JavaScript framework, version 1.6.0.2
terom@13:  *  (c) 2005-2008 Sam Stephenson
terom@13:  *
terom@13:  *  Prototype is freely distributable under the terms of an MIT-style license.
terom@13:  *  For details, see the Prototype web site: http://www.prototypejs.org/
terom@13:  *
terom@13:  *--------------------------------------------------------------------------*/
terom@13: 
terom@13: var Prototype = {
terom@13:   Version: '1.6.0.2',
terom@13: 
terom@13:   Browser: {
terom@13:     IE:     !!(window.attachEvent && !window.opera),
terom@13:     Opera:  !!window.opera,
terom@13:     WebKit: navigator.userAgent.indexOf('AppleWebKit/') > -1,
terom@13:     Gecko:  navigator.userAgent.indexOf('Gecko') > -1 && navigator.userAgent.indexOf('KHTML') == -1,
terom@13:     MobileSafari: !!navigator.userAgent.match(/Apple.*Mobile.*Safari/)
terom@13:   },
terom@13: 
terom@13:   BrowserFeatures: {
terom@13:     XPath: !!document.evaluate,
terom@13:     ElementExtensions: !!window.HTMLElement,
terom@13:     SpecificElementExtensions:
terom@13:       document.createElement('div').__proto__ &&
terom@13:       document.createElement('div').__proto__ !==
terom@13:         document.createElement('form').__proto__
terom@13:   },
terom@13: 
terom@13:   ScriptFragment: '<script[^>]*>([\\S\\s]*?)<\/script>',
terom@13:   JSONFilter: /^\/\*-secure-([\s\S]*)\*\/\s*$/,
terom@13: 
terom@13:   emptyFunction: function() { },
terom@13:   K: function(x) { return x }
terom@13: };
terom@13: 
terom@13: if (Prototype.Browser.MobileSafari)
terom@13:   Prototype.BrowserFeatures.SpecificElementExtensions = false;
terom@13: 
terom@13: 
terom@13: /* Based on Alex Arnell's inheritance implementation. */
terom@13: var Class = {
terom@13:   create: function() {
terom@13:     var parent = null, properties = $A(arguments);
terom@13:     if (Object.isFunction(properties[0]))
terom@13:       parent = properties.shift();
terom@13: 
terom@13:     function klass() {
terom@13:       this.initialize.apply(this, arguments);
terom@13:     }
terom@13: 
terom@13:     Object.extend(klass, Class.Methods);
terom@13:     klass.superclass = parent;
terom@13:     klass.subclasses = [];
terom@13: 
terom@13:     if (parent) {
terom@13:       var subclass = function() { };
terom@13:       subclass.prototype = parent.prototype;
terom@13:       klass.prototype = new subclass;
terom@13:       parent.subclasses.push(klass);
terom@13:     }
terom@13: 
terom@13:     for (var i = 0; i < properties.length; i++)
terom@13:       klass.addMethods(properties[i]);
terom@13: 
terom@13:     if (!klass.prototype.initialize)
terom@13:       klass.prototype.initialize = Prototype.emptyFunction;
terom@13: 
terom@13:     klass.prototype.constructor = klass;
terom@13: 
terom@13:     return klass;
terom@13:   }
terom@13: };
terom@13: 
terom@13: Class.Methods = {
terom@13:   addMethods: function(source) {
terom@13:     var ancestor   = this.superclass && this.superclass.prototype;
terom@13:     var properties = Object.keys(source);
terom@13: 
terom@13:     if (!Object.keys({ toString: true }).length)
terom@13:       properties.push("toString", "valueOf");
terom@13: 
terom@13:     for (var i = 0, length = properties.length; i < length; i++) {
terom@13:       var property = properties[i], value = source[property];
terom@13:       if (ancestor && Object.isFunction(value) &&
terom@13:           value.argumentNames().first() == "$super") {
terom@13:         var method = value, value = Object.extend((function(m) {
terom@13:           return function() { return ancestor[m].apply(this, arguments) };
terom@13:         })(property).wrap(method), {
terom@13:           valueOf:  function() { return method },
terom@13:           toString: function() { return method.toString() }
terom@13:         });
terom@13:       }
terom@13:       this.prototype[property] = value;
terom@13:     }
terom@13: 
terom@13:     return this;
terom@13:   }
terom@13: };
terom@13: 
terom@13: var Abstract = { };
terom@13: 
terom@13: Object.extend = function(destination, source) {
terom@13:   for (var property in source)
terom@13:     destination[property] = source[property];
terom@13:   return destination;
terom@13: };
terom@13: 
terom@13: Object.extend(Object, {
terom@13:   inspect: function(object) {
terom@13:     try {
terom@13:       if (Object.isUndefined(object)) return 'undefined';
terom@13:       if (object === null) return 'null';
terom@13:       return object.inspect ? object.inspect() : String(object);
terom@13:     } catch (e) {
terom@13:       if (e instanceof RangeError) return '...';
terom@13:       throw e;
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   toJSON: function(object) {
terom@13:     var type = typeof object;
terom@13:     switch (type) {
terom@13:       case 'undefined':
terom@13:       case 'function':
terom@13:       case 'unknown': return;
terom@13:       case 'boolean': return object.toString();
terom@13:     }
terom@13: 
terom@13:     if (object === null) return 'null';
terom@13:     if (object.toJSON) return object.toJSON();
terom@13:     if (Object.isElement(object)) return;
terom@13: 
terom@13:     var results = [];
terom@13:     for (var property in object) {
terom@13:       var value = Object.toJSON(object[property]);
terom@13:       if (!Object.isUndefined(value))
terom@13:         results.push(property.toJSON() + ': ' + value);
terom@13:     }
terom@13: 
terom@13:     return '{' + results.join(', ') + '}';
terom@13:   },
terom@13: 
terom@13:   toQueryString: function(object) {
terom@13:     return $H(object).toQueryString();
terom@13:   },
terom@13: 
terom@13:   toHTML: function(object) {
terom@13:     return object && object.toHTML ? object.toHTML() : String.interpret(object);
terom@13:   },
terom@13: 
terom@13:   keys: function(object) {
terom@13:     var keys = [];
terom@13:     for (var property in object)
terom@13:       keys.push(property);
terom@13:     return keys;
terom@13:   },
terom@13: 
terom@13:   values: function(object) {
terom@13:     var values = [];
terom@13:     for (var property in object)
terom@13:       values.push(object[property]);
terom@13:     return values;
terom@13:   },
terom@13: 
terom@13:   clone: function(object) {
terom@13:     return Object.extend({ }, object);
terom@13:   },
terom@13: 
terom@13:   isElement: function(object) {
terom@13:     return object && object.nodeType == 1;
terom@13:   },
terom@13: 
terom@13:   isArray: function(object) {
terom@13:     return object != null && typeof object == "object" &&
terom@13:       'splice' in object && 'join' in object;
terom@13:   },
terom@13: 
terom@13:   isHash: function(object) {
terom@13:     return object instanceof Hash;
terom@13:   },
terom@13: 
terom@13:   isFunction: function(object) {
terom@13:     return typeof object == "function";
terom@13:   },
terom@13: 
terom@13:   isString: function(object) {
terom@13:     return typeof object == "string";
terom@13:   },
terom@13: 
terom@13:   isNumber: function(object) {
terom@13:     return typeof object == "number";
terom@13:   },
terom@13: 
terom@13:   isUndefined: function(object) {
terom@13:     return typeof object == "undefined";
terom@13:   }
terom@13: });
terom@13: 
terom@13: Object.extend(Function.prototype, {
terom@13:   argumentNames: function() {
terom@13:     var names = this.toString().match(/^[\s\(]*function[^(]*\((.*?)\)/)[1].split(",").invoke("strip");
terom@13:     return names.length == 1 && !names[0] ? [] : names;
terom@13:   },
terom@13: 
terom@13:   bind: function() {
terom@13:     if (arguments.length < 2 && Object.isUndefined(arguments[0])) return this;
terom@13:     var __method = this, args = $A(arguments), object = args.shift();
terom@13:     return function() {
terom@13:       return __method.apply(object, args.concat($A(arguments)));
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   bindAsEventListener: function() {
terom@13:     var __method = this, args = $A(arguments), object = args.shift();
terom@13:     return function(event) {
terom@13:       return __method.apply(object, [event || window.event].concat(args));
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   curry: function() {
terom@13:     if (!arguments.length) return this;
terom@13:     var __method = this, args = $A(arguments);
terom@13:     return function() {
terom@13:       return __method.apply(this, args.concat($A(arguments)));
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   delay: function() {
terom@13:     var __method = this, args = $A(arguments), timeout = args.shift() * 1000;
terom@13:     return window.setTimeout(function() {
terom@13:       return __method.apply(__method, args);
terom@13:     }, timeout);
terom@13:   },
terom@13: 
terom@13:   wrap: function(wrapper) {
terom@13:     var __method = this;
terom@13:     return function() {
terom@13:       return wrapper.apply(this, [__method.bind(this)].concat($A(arguments)));
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   methodize: function() {
terom@13:     if (this._methodized) return this._methodized;
terom@13:     var __method = this;
terom@13:     return this._methodized = function() {
terom@13:       return __method.apply(null, [this].concat($A(arguments)));
terom@13:     };
terom@13:   }
terom@13: });
terom@13: 
terom@13: Function.prototype.defer = Function.prototype.delay.curry(0.01);
terom@13: 
terom@13: Date.prototype.toJSON = function() {
terom@13:   return '"' + this.getUTCFullYear() + '-' +
terom@13:     (this.getUTCMonth() + 1).toPaddedString(2) + '-' +
terom@13:     this.getUTCDate().toPaddedString(2) + 'T' +
terom@13:     this.getUTCHours().toPaddedString(2) + ':' +
terom@13:     this.getUTCMinutes().toPaddedString(2) + ':' +
terom@13:     this.getUTCSeconds().toPaddedString(2) + 'Z"';
terom@13: };
terom@13: 
terom@13: var Try = {
terom@13:   these: function() {
terom@13:     var returnValue;
terom@13: 
terom@13:     for (var i = 0, length = arguments.length; i < length; i++) {
terom@13:       var lambda = arguments[i];
terom@13:       try {
terom@13:         returnValue = lambda();
terom@13:         break;
terom@13:       } catch (e) { }
terom@13:     }
terom@13: 
terom@13:     return returnValue;
terom@13:   }
terom@13: };
terom@13: 
terom@13: RegExp.prototype.match = RegExp.prototype.test;
terom@13: 
terom@13: RegExp.escape = function(str) {
terom@13:   return String(str).replace(/([.*+?^=!:${}()|[\]\/\\])/g, '\\$1');
terom@13: };
terom@13: 
terom@13: /*--------------------------------------------------------------------------*/
terom@13: 
terom@13: var PeriodicalExecuter = Class.create({
terom@13:   initialize: function(callback, frequency) {
terom@13:     this.callback = callback;
terom@13:     this.frequency = frequency;
terom@13:     this.currentlyExecuting = false;
terom@13: 
terom@13:     this.registerCallback();
terom@13:   },
terom@13: 
terom@13:   registerCallback: function() {
terom@13:     this.timer = setInterval(this.onTimerEvent.bind(this), this.frequency * 1000);
terom@13:   },
terom@13: 
terom@13:   execute: function() {
terom@13:     this.callback(this);
terom@13:   },
terom@13: 
terom@13:   stop: function() {
terom@13:     if (!this.timer) return;
terom@13:     clearInterval(this.timer);
terom@13:     this.timer = null;
terom@13:   },
terom@13: 
terom@13:   onTimerEvent: function() {
terom@13:     if (!this.currentlyExecuting) {
terom@13:       try {
terom@13:         this.currentlyExecuting = true;
terom@13:         this.execute();
terom@13:       } finally {
terom@13:         this.currentlyExecuting = false;
terom@13:       }
terom@13:     }
terom@13:   }
terom@13: });
terom@13: Object.extend(String, {
terom@13:   interpret: function(value) {
terom@13:     return value == null ? '' : String(value);
terom@13:   },
terom@13:   specialChar: {
terom@13:     '\b': '\\b',
terom@13:     '\t': '\\t',
terom@13:     '\n': '\\n',
terom@13:     '\f': '\\f',
terom@13:     '\r': '\\r',
terom@13:     '\\': '\\\\'
terom@13:   }
terom@13: });
terom@13: 
terom@13: Object.extend(String.prototype, {
terom@13:   gsub: function(pattern, replacement) {
terom@13:     var result = '', source = this, match;
terom@13:     replacement = arguments.callee.prepareReplacement(replacement);
terom@13: 
terom@13:     while (source.length > 0) {
terom@13:       if (match = source.match(pattern)) {
terom@13:         result += source.slice(0, match.index);
terom@13:         result += String.interpret(replacement(match));
terom@13:         source  = source.slice(match.index + match[0].length);
terom@13:       } else {
terom@13:         result += source, source = '';
terom@13:       }
terom@13:     }
terom@13:     return result;
terom@13:   },
terom@13: 
terom@13:   sub: function(pattern, replacement, count) {
terom@13:     replacement = this.gsub.prepareReplacement(replacement);
terom@13:     count = Object.isUndefined(count) ? 1 : count;
terom@13: 
terom@13:     return this.gsub(pattern, function(match) {
terom@13:       if (--count < 0) return match[0];
terom@13:       return replacement(match);
terom@13:     });
terom@13:   },
terom@13: 
terom@13:   scan: function(pattern, iterator) {
terom@13:     this.gsub(pattern, iterator);
terom@13:     return String(this);
terom@13:   },
terom@13: 
terom@13:   truncate: function(length, truncation) {
terom@13:     length = length || 30;
terom@13:     truncation = Object.isUndefined(truncation) ? '...' : truncation;
terom@13:     return this.length > length ?
terom@13:       this.slice(0, length - truncation.length) + truncation : String(this);
terom@13:   },
terom@13: 
terom@13:   strip: function() {
terom@13:     return this.replace(/^\s+/, '').replace(/\s+$/, '');
terom@13:   },
terom@13: 
terom@13:   stripTags: function() {
terom@13:     return this.replace(/<\/?[^>]+>/gi, '');
terom@13:   },
terom@13: 
terom@13:   stripScripts: function() {
terom@13:     return this.replace(new RegExp(Prototype.ScriptFragment, 'img'), '');
terom@13:   },
terom@13: 
terom@13:   extractScripts: function() {
terom@13:     var matchAll = new RegExp(Prototype.ScriptFragment, 'img');
terom@13:     var matchOne = new RegExp(Prototype.ScriptFragment, 'im');
terom@13:     return (this.match(matchAll) || []).map(function(scriptTag) {
terom@13:       return (scriptTag.match(matchOne) || ['', ''])[1];
terom@13:     });
terom@13:   },
terom@13: 
terom@13:   evalScripts: function() {
terom@13:     return this.extractScripts().map(function(script) { return eval(script) });
terom@13:   },
terom@13: 
terom@13:   escapeHTML: function() {
terom@13:     var self = arguments.callee;
terom@13:     self.text.data = this;
terom@13:     return self.div.innerHTML;
terom@13:   },
terom@13: 
terom@13:   unescapeHTML: function() {
terom@13:     var div = new Element('div');
terom@13:     div.innerHTML = this.stripTags();
terom@13:     return div.childNodes[0] ? (div.childNodes.length > 1 ?
terom@13:       $A(div.childNodes).inject('', function(memo, node) { return memo+node.nodeValue }) :
terom@13:       div.childNodes[0].nodeValue) : '';
terom@13:   },
terom@13: 
terom@13:   toQueryParams: function(separator) {
terom@13:     var match = this.strip().match(/([^?#]*)(#.*)?$/);
terom@13:     if (!match) return { };
terom@13: 
terom@13:     return match[1].split(separator || '&').inject({ }, function(hash, pair) {
terom@13:       if ((pair = pair.split('='))[0]) {
terom@13:         var key = decodeURIComponent(pair.shift());
terom@13:         var value = pair.length > 1 ? pair.join('=') : pair[0];
terom@13:         if (value != undefined) value = decodeURIComponent(value);
terom@13: 
terom@13:         if (key in hash) {
terom@13:           if (!Object.isArray(hash[key])) hash[key] = [hash[key]];
terom@13:           hash[key].push(value);
terom@13:         }
terom@13:         else hash[key] = value;
terom@13:       }
terom@13:       return hash;
terom@13:     });
terom@13:   },
terom@13: 
terom@13:   toArray: function() {
terom@13:     return this.split('');
terom@13:   },
terom@13: 
terom@13:   succ: function() {
terom@13:     return this.slice(0, this.length - 1) +
terom@13:       String.fromCharCode(this.charCodeAt(this.length - 1) + 1);
terom@13:   },
terom@13: 
terom@13:   times: function(count) {
terom@13:     return count < 1 ? '' : new Array(count + 1).join(this);
terom@13:   },
terom@13: 
terom@13:   camelize: function() {
terom@13:     var parts = this.split('-'), len = parts.length;
terom@13:     if (len == 1) return parts[0];
terom@13: 
terom@13:     var camelized = this.charAt(0) == '-'
terom@13:       ? parts[0].charAt(0).toUpperCase() + parts[0].substring(1)
terom@13:       : parts[0];
terom@13: 
terom@13:     for (var i = 1; i < len; i++)
terom@13:       camelized += parts[i].charAt(0).toUpperCase() + parts[i].substring(1);
terom@13: 
terom@13:     return camelized;
terom@13:   },
terom@13: 
terom@13:   capitalize: function() {
terom@13:     return this.charAt(0).toUpperCase() + this.substring(1).toLowerCase();
terom@13:   },
terom@13: 
terom@13:   underscore: function() {
terom@13:     return this.gsub(/::/, '/').gsub(/([A-Z]+)([A-Z][a-z])/,'#{1}_#{2}').gsub(/([a-z\d])([A-Z])/,'#{1}_#{2}').gsub(/-/,'_').toLowerCase();
terom@13:   },
terom@13: 
terom@13:   dasherize: function() {
terom@13:     return this.gsub(/_/,'-');
terom@13:   },
terom@13: 
terom@13:   inspect: function(useDoubleQuotes) {
terom@13:     var escapedString = this.gsub(/[\x00-\x1f\\]/, function(match) {
terom@13:       var character = String.specialChar[match[0]];
terom@13:       return character ? character : '\\u00' + match[0].charCodeAt().toPaddedString(2, 16);
terom@13:     });
terom@13:     if (useDoubleQuotes) return '"' + escapedString.replace(/"/g, '\\"') + '"';
terom@13:     return "'" + escapedString.replace(/'/g, '\\\'') + "'";
terom@13:   },
terom@13: 
terom@13:   toJSON: function() {
terom@13:     return this.inspect(true);
terom@13:   },
terom@13: 
terom@13:   unfilterJSON: function(filter) {
terom@13:     return this.sub(filter || Prototype.JSONFilter, '#{1}');
terom@13:   },
terom@13: 
terom@13:   isJSON: function() {
terom@13:     var str = this;
terom@13:     if (str.blank()) return false;
terom@13:     str = this.replace(/\\./g, '@').replace(/"[^"\\\n\r]*"/g, '');
terom@13:     return (/^[,:{}\[\]0-9.\-+Eaeflnr-u \n\r\t]*$/).test(str);
terom@13:   },
terom@13: 
terom@13:   evalJSON: function(sanitize) {
terom@13:     var json = this.unfilterJSON();
terom@13:     try {
terom@13:       if (!sanitize || json.isJSON()) return eval('(' + json + ')');
terom@13:     } catch (e) { }
terom@13:     throw new SyntaxError('Badly formed JSON string: ' + this.inspect());
terom@13:   },
terom@13: 
terom@13:   include: function(pattern) {
terom@13:     return this.indexOf(pattern) > -1;
terom@13:   },
terom@13: 
terom@13:   startsWith: function(pattern) {
terom@13:     return this.indexOf(pattern) === 0;
terom@13:   },
terom@13: 
terom@13:   endsWith: function(pattern) {
terom@13:     var d = this.length - pattern.length;
terom@13:     return d >= 0 && this.lastIndexOf(pattern) === d;
terom@13:   },
terom@13: 
terom@13:   empty: function() {
terom@13:     return this == '';
terom@13:   },
terom@13: 
terom@13:   blank: function() {
terom@13:     return /^\s*$/.test(this);
terom@13:   },
terom@13: 
terom@13:   interpolate: function(object, pattern) {
terom@13:     return new Template(this, pattern).evaluate(object);
terom@13:   }
terom@13: });
terom@13: 
terom@13: if (Prototype.Browser.WebKit || Prototype.Browser.IE) Object.extend(String.prototype, {
terom@13:   escapeHTML: function() {
terom@13:     return this.replace(/&/g,'&amp;').replace(/</g,'&lt;').replace(/>/g,'&gt;');
terom@13:   },
terom@13:   unescapeHTML: function() {
terom@13:     return this.replace(/&amp;/g,'&').replace(/&lt;/g,'<').replace(/&gt;/g,'>');
terom@13:   }
terom@13: });
terom@13: 
terom@13: String.prototype.gsub.prepareReplacement = function(replacement) {
terom@13:   if (Object.isFunction(replacement)) return replacement;
terom@13:   var template = new Template(replacement);
terom@13:   return function(match) { return template.evaluate(match) };
terom@13: };
terom@13: 
terom@13: String.prototype.parseQuery = String.prototype.toQueryParams;
terom@13: 
terom@13: Object.extend(String.prototype.escapeHTML, {
terom@13:   div:  document.createElement('div'),
terom@13:   text: document.createTextNode('')
terom@13: });
terom@13: 
terom@13: with (String.prototype.escapeHTML) div.appendChild(text);
terom@13: 
terom@13: var Template = Class.create({
terom@13:   initialize: function(template, pattern) {
terom@13:     this.template = template.toString();
terom@13:     this.pattern = pattern || Template.Pattern;
terom@13:   },
terom@13: 
terom@13:   evaluate: function(object) {
terom@13:     if (Object.isFunction(object.toTemplateReplacements))
terom@13:       object = object.toTemplateReplacements();
terom@13: 
terom@13:     return this.template.gsub(this.pattern, function(match) {
terom@13:       if (object == null) return '';
terom@13: 
terom@13:       var before = match[1] || '';
terom@13:       if (before == '\\') return match[2];
terom@13: 
terom@13:       var ctx = object, expr = match[3];
terom@13:       var pattern = /^([^.[]+|\[((?:.*?[^\\])?)\])(\.|\[|$)/;
terom@13:       match = pattern.exec(expr);
terom@13:       if (match == null) return before;
terom@13: 
terom@13:       while (match != null) {
terom@13:         var comp = match[1].startsWith('[') ? match[2].gsub('\\\\]', ']') : match[1];
terom@13:         ctx = ctx[comp];
terom@13:         if (null == ctx || '' == match[3]) break;
terom@13:         expr = expr.substring('[' == match[3] ? match[1].length : match[0].length);
terom@13:         match = pattern.exec(expr);
terom@13:       }
terom@13: 
terom@13:       return before + String.interpret(ctx);
terom@13:     });
terom@13:   }
terom@13: });
terom@13: Template.Pattern = /(^|.|\r|\n)(#\{(.*?)\})/;
terom@13: 
terom@13: var $break = { };
terom@13: 
terom@13: var Enumerable = {
terom@13:   each: function(iterator, context) {
terom@13:     var index = 0;
terom@13:     iterator = iterator.bind(context);
terom@13:     try {
terom@13:       this._each(function(value) {
terom@13:         iterator(value, index++);
terom@13:       });
terom@13:     } catch (e) {
terom@13:       if (e != $break) throw e;
terom@13:     }
terom@13:     return this;
terom@13:   },
terom@13: 
terom@13:   eachSlice: function(number, iterator, context) {
terom@13:     iterator = iterator ? iterator.bind(context) : Prototype.K;
terom@13:     var index = -number, slices = [], array = this.toArray();
terom@13:     while ((index += number) < array.length)
terom@13:       slices.push(array.slice(index, index+number));
terom@13:     return slices.collect(iterator, context);
terom@13:   },
terom@13: 
terom@13:   all: function(iterator, context) {
terom@13:     iterator = iterator ? iterator.bind(context) : Prototype.K;
terom@13:     var result = true;
terom@13:     this.each(function(value, index) {
terom@13:       result = result && !!iterator(value, index);
terom@13:       if (!result) throw $break;
terom@13:     });
terom@13:     return result;
terom@13:   },
terom@13: 
terom@13:   any: function(iterator, context) {
terom@13:     iterator = iterator ? iterator.bind(context) : Prototype.K;
terom@13:     var result = false;
terom@13:     this.each(function(value, index) {
terom@13:       if (result = !!iterator(value, index))
terom@13:         throw $break;
terom@13:     });
terom@13:     return result;
terom@13:   },
terom@13: 
terom@13:   collect: function(iterator, context) {
terom@13:     iterator = iterator ? iterator.bind(context) : Prototype.K;
terom@13:     var results = [];
terom@13:     this.each(function(value, index) {
terom@13:       results.push(iterator(value, index));
terom@13:     });
terom@13:     return results;
terom@13:   },
terom@13: 
terom@13:   detect: function(iterator, context) {
terom@13:     iterator = iterator.bind(context);
terom@13:     var result;
terom@13:     this.each(function(value, index) {
terom@13:       if (iterator(value, index)) {
terom@13:         result = value;
terom@13:         throw $break;
terom@13:       }
terom@13:     });
terom@13:     return result;
terom@13:   },
terom@13: 
terom@13:   findAll: function(iterator, context) {
terom@13:     iterator = iterator.bind(context);
terom@13:     var results = [];
terom@13:     this.each(function(value, index) {
terom@13:       if (iterator(value, index))
terom@13:         results.push(value);
terom@13:     });
terom@13:     return results;
terom@13:   },
terom@13: 
terom@13:   grep: function(filter, iterator, context) {
terom@13:     iterator = iterator ? iterator.bind(context) : Prototype.K;
terom@13:     var results = [];
terom@13: 
terom@13:     if (Object.isString(filter))
terom@13:       filter = new RegExp(filter);
terom@13: 
terom@13:     this.each(function(value, index) {
terom@13:       if (filter.match(value))
terom@13:         results.push(iterator(value, index));
terom@13:     });
terom@13:     return results;
terom@13:   },
terom@13: 
terom@13:   include: function(object) {
terom@13:     if (Object.isFunction(this.indexOf))
terom@13:       if (this.indexOf(object) != -1) return true;
terom@13: 
terom@13:     var found = false;
terom@13:     this.each(function(value) {
terom@13:       if (value == object) {
terom@13:         found = true;
terom@13:         throw $break;
terom@13:       }
terom@13:     });
terom@13:     return found;
terom@13:   },
terom@13: 
terom@13:   inGroupsOf: function(number, fillWith) {
terom@13:     fillWith = Object.isUndefined(fillWith) ? null : fillWith;
terom@13:     return this.eachSlice(number, function(slice) {
terom@13:       while(slice.length < number) slice.push(fillWith);
terom@13:       return slice;
terom@13:     });
terom@13:   },
terom@13: 
terom@13:   inject: function(memo, iterator, context) {
terom@13:     iterator = iterator.bind(context);
terom@13:     this.each(function(value, index) {
terom@13:       memo = iterator(memo, value, index);
terom@13:     });
terom@13:     return memo;
terom@13:   },
terom@13: 
terom@13:   invoke: function(method) {
terom@13:     var args = $A(arguments).slice(1);
terom@13:     return this.map(function(value) {
terom@13:       return value[method].apply(value, args);
terom@13:     });
terom@13:   },
terom@13: 
terom@13:   max: function(iterator, context) {
terom@13:     iterator = iterator ? iterator.bind(context) : Prototype.K;
terom@13:     var result;
terom@13:     this.each(function(value, index) {
terom@13:       value = iterator(value, index);
terom@13:       if (result == null || value >= result)
terom@13:         result = value;
terom@13:     });
terom@13:     return result;
terom@13:   },
terom@13: 
terom@13:   min: function(iterator, context) {
terom@13:     iterator = iterator ? iterator.bind(context) : Prototype.K;
terom@13:     var result;
terom@13:     this.each(function(value, index) {
terom@13:       value = iterator(value, index);
terom@13:       if (result == null || value < result)
terom@13:         result = value;
terom@13:     });
terom@13:     return result;
terom@13:   },
terom@13: 
terom@13:   partition: function(iterator, context) {
terom@13:     iterator = iterator ? iterator.bind(context) : Prototype.K;
terom@13:     var trues = [], falses = [];
terom@13:     this.each(function(value, index) {
terom@13:       (iterator(value, index) ?
terom@13:         trues : falses).push(value);
terom@13:     });
terom@13:     return [trues, falses];
terom@13:   },
terom@13: 
terom@13:   pluck: function(property) {
terom@13:     var results = [];
terom@13:     this.each(function(value) {
terom@13:       results.push(value[property]);
terom@13:     });
terom@13:     return results;
terom@13:   },
terom@13: 
terom@13:   reject: function(iterator, context) {
terom@13:     iterator = iterator.bind(context);
terom@13:     var results = [];
terom@13:     this.each(function(value, index) {
terom@13:       if (!iterator(value, index))
terom@13:         results.push(value);
terom@13:     });
terom@13:     return results;
terom@13:   },
terom@13: 
terom@13:   sortBy: function(iterator, context) {
terom@13:     iterator = iterator.bind(context);
terom@13:     return this.map(function(value, index) {
terom@13:       return {value: value, criteria: iterator(value, index)};
terom@13:     }).sort(function(left, right) {
terom@13:       var a = left.criteria, b = right.criteria;
terom@13:       return a < b ? -1 : a > b ? 1 : 0;
terom@13:     }).pluck('value');
terom@13:   },
terom@13: 
terom@13:   toArray: function() {
terom@13:     return this.map();
terom@13:   },
terom@13: 
terom@13:   zip: function() {
terom@13:     var iterator = Prototype.K, args = $A(arguments);
terom@13:     if (Object.isFunction(args.last()))
terom@13:       iterator = args.pop();
terom@13: 
terom@13:     var collections = [this].concat(args).map($A);
terom@13:     return this.map(function(value, index) {
terom@13:       return iterator(collections.pluck(index));
terom@13:     });
terom@13:   },
terom@13: 
terom@13:   size: function() {
terom@13:     return this.toArray().length;
terom@13:   },
terom@13: 
terom@13:   inspect: function() {
terom@13:     return '#<Enumerable:' + this.toArray().inspect() + '>';
terom@13:   }
terom@13: };
terom@13: 
terom@13: Object.extend(Enumerable, {
terom@13:   map:     Enumerable.collect,
terom@13:   find:    Enumerable.detect,
terom@13:   select:  Enumerable.findAll,
terom@13:   filter:  Enumerable.findAll,
terom@13:   member:  Enumerable.include,
terom@13:   entries: Enumerable.toArray,
terom@13:   every:   Enumerable.all,
terom@13:   some:    Enumerable.any
terom@13: });
terom@13: function $A(iterable) {
terom@13:   if (!iterable) return [];
terom@13:   if (iterable.toArray) return iterable.toArray();
terom@13:   var length = iterable.length || 0, results = new Array(length);
terom@13:   while (length--) results[length] = iterable[length];
terom@13:   return results;
terom@13: }
terom@13: 
terom@13: if (Prototype.Browser.WebKit) {
terom@13:   $A = function(iterable) {
terom@13:     if (!iterable) return [];
terom@13:     if (!(Object.isFunction(iterable) && iterable == '[object NodeList]') &&
terom@13:         iterable.toArray) return iterable.toArray();
terom@13:     var length = iterable.length || 0, results = new Array(length);
terom@13:     while (length--) results[length] = iterable[length];
terom@13:     return results;
terom@13:   };
terom@13: }
terom@13: 
terom@13: Array.from = $A;
terom@13: 
terom@13: Object.extend(Array.prototype, Enumerable);
terom@13: 
terom@13: if (!Array.prototype._reverse) Array.prototype._reverse = Array.prototype.reverse;
terom@13: 
terom@13: Object.extend(Array.prototype, {
terom@13:   _each: function(iterator) {
terom@13:     for (var i = 0, length = this.length; i < length; i++)
terom@13:       iterator(this[i]);
terom@13:   },
terom@13: 
terom@13:   clear: function() {
terom@13:     this.length = 0;
terom@13:     return this;
terom@13:   },
terom@13: 
terom@13:   first: function() {
terom@13:     return this[0];
terom@13:   },
terom@13: 
terom@13:   last: function() {
terom@13:     return this[this.length - 1];
terom@13:   },
terom@13: 
terom@13:   compact: function() {
terom@13:     return this.select(function(value) {
terom@13:       return value != null;
terom@13:     });
terom@13:   },
terom@13: 
terom@13:   flatten: function() {
terom@13:     return this.inject([], function(array, value) {
terom@13:       return array.concat(Object.isArray(value) ?
terom@13:         value.flatten() : [value]);
terom@13:     });
terom@13:   },
terom@13: 
terom@13:   without: function() {
terom@13:     var values = $A(arguments);
terom@13:     return this.select(function(value) {
terom@13:       return !values.include(value);
terom@13:     });
terom@13:   },
terom@13: 
terom@13:   reverse: function(inline) {
terom@13:     return (inline !== false ? this : this.toArray())._reverse();
terom@13:   },
terom@13: 
terom@13:   reduce: function() {
terom@13:     return this.length > 1 ? this : this[0];
terom@13:   },
terom@13: 
terom@13:   uniq: function(sorted) {
terom@13:     return this.inject([], function(array, value, index) {
terom@13:       if (0 == index || (sorted ? array.last() != value : !array.include(value)))
terom@13:         array.push(value);
terom@13:       return array;
terom@13:     });
terom@13:   },
terom@13: 
terom@13:   intersect: function(array) {
terom@13:     return this.uniq().findAll(function(item) {
terom@13:       return array.detect(function(value) { return item === value });
terom@13:     });
terom@13:   },
terom@13: 
terom@13:   clone: function() {
terom@13:     return [].concat(this);
terom@13:   },
terom@13: 
terom@13:   size: function() {
terom@13:     return this.length;
terom@13:   },
terom@13: 
terom@13:   inspect: function() {
terom@13:     return '[' + this.map(Object.inspect).join(', ') + ']';
terom@13:   },
terom@13: 
terom@13:   toJSON: function() {
terom@13:     var results = [];
terom@13:     this.each(function(object) {
terom@13:       var value = Object.toJSON(object);
terom@13:       if (!Object.isUndefined(value)) results.push(value);
terom@13:     });
terom@13:     return '[' + results.join(', ') + ']';
terom@13:   }
terom@13: });
terom@13: 
terom@13: // use native browser JS 1.6 implementation if available
terom@13: if (Object.isFunction(Array.prototype.forEach))
terom@13:   Array.prototype._each = Array.prototype.forEach;
terom@13: 
terom@13: if (!Array.prototype.indexOf) Array.prototype.indexOf = function(item, i) {
terom@13:   i || (i = 0);
terom@13:   var length = this.length;
terom@13:   if (i < 0) i = length + i;
terom@13:   for (; i < length; i++)
terom@13:     if (this[i] === item) return i;
terom@13:   return -1;
terom@13: };
terom@13: 
terom@13: if (!Array.prototype.lastIndexOf) Array.prototype.lastIndexOf = function(item, i) {
terom@13:   i = isNaN(i) ? this.length : (i < 0 ? this.length + i : i) + 1;
terom@13:   var n = this.slice(0, i).reverse().indexOf(item);
terom@13:   return (n < 0) ? n : i - n - 1;
terom@13: };
terom@13: 
terom@13: Array.prototype.toArray = Array.prototype.clone;
terom@13: 
terom@13: function $w(string) {
terom@13:   if (!Object.isString(string)) return [];
terom@13:   string = string.strip();
terom@13:   return string ? string.split(/\s+/) : [];
terom@13: }
terom@13: 
terom@13: if (Prototype.Browser.Opera){
terom@13:   Array.prototype.concat = function() {
terom@13:     var array = [];
terom@13:     for (var i = 0, length = this.length; i < length; i++) array.push(this[i]);
terom@13:     for (var i = 0, length = arguments.length; i < length; i++) {
terom@13:       if (Object.isArray(arguments[i])) {
terom@13:         for (var j = 0, arrayLength = arguments[i].length; j < arrayLength; j++)
terom@13:           array.push(arguments[i][j]);
terom@13:       } else {
terom@13:         array.push(arguments[i]);
terom@13:       }
terom@13:     }
terom@13:     return array;
terom@13:   };
terom@13: }
terom@13: Object.extend(Number.prototype, {
terom@13:   toColorPart: function() {
terom@13:     return this.toPaddedString(2, 16);
terom@13:   },
terom@13: 
terom@13:   succ: function() {
terom@13:     return this + 1;
terom@13:   },
terom@13: 
terom@13:   times: function(iterator) {
terom@13:     $R(0, this, true).each(iterator);
terom@13:     return this;
terom@13:   },
terom@13: 
terom@13:   toPaddedString: function(length, radix) {
terom@13:     var string = this.toString(radix || 10);
terom@13:     return '0'.times(length - string.length) + string;
terom@13:   },
terom@13: 
terom@13:   toJSON: function() {
terom@13:     return isFinite(this) ? this.toString() : 'null';
terom@13:   }
terom@13: });
terom@13: 
terom@13: $w('abs round ceil floor').each(function(method){
terom@13:   Number.prototype[method] = Math[method].methodize();
terom@13: });
terom@13: function $H(object) {
terom@13:   return new Hash(object);
terom@13: };
terom@13: 
terom@13: var Hash = Class.create(Enumerable, (function() {
terom@13: 
terom@13:   function toQueryPair(key, value) {
terom@13:     if (Object.isUndefined(value)) return key;
terom@13:     return key + '=' + encodeURIComponent(String.interpret(value));
terom@13:   }
terom@13: 
terom@13:   return {
terom@13:     initialize: function(object) {
terom@13:       this._object = Object.isHash(object) ? object.toObject() : Object.clone(object);
terom@13:     },
terom@13: 
terom@13:     _each: function(iterator) {
terom@13:       for (var key in this._object) {
terom@13:         var value = this._object[key], pair = [key, value];
terom@13:         pair.key = key;
terom@13:         pair.value = value;
terom@13:         iterator(pair);
terom@13:       }
terom@13:     },
terom@13: 
terom@13:     set: function(key, value) {
terom@13:       return this._object[key] = value;
terom@13:     },
terom@13: 
terom@13:     get: function(key) {
terom@13:       return this._object[key];
terom@13:     },
terom@13: 
terom@13:     unset: function(key) {
terom@13:       var value = this._object[key];
terom@13:       delete this._object[key];
terom@13:       return value;
terom@13:     },
terom@13: 
terom@13:     toObject: function() {
terom@13:       return Object.clone(this._object);
terom@13:     },
terom@13: 
terom@13:     keys: function() {
terom@13:       return this.pluck('key');
terom@13:     },
terom@13: 
terom@13:     values: function() {
terom@13:       return this.pluck('value');
terom@13:     },
terom@13: 
terom@13:     index: function(value) {
terom@13:       var match = this.detect(function(pair) {
terom@13:         return pair.value === value;
terom@13:       });
terom@13:       return match && match.key;
terom@13:     },
terom@13: 
terom@13:     merge: function(object) {
terom@13:       return this.clone().update(object);
terom@13:     },
terom@13: 
terom@13:     update: function(object) {
terom@13:       return new Hash(object).inject(this, function(result, pair) {
terom@13:         result.set(pair.key, pair.value);
terom@13:         return result;
terom@13:       });
terom@13:     },
terom@13: 
terom@13:     toQueryString: function() {
terom@13:       return this.map(function(pair) {
terom@13:         var key = encodeURIComponent(pair.key), values = pair.value;
terom@13: 
terom@13:         if (values && typeof values == 'object') {
terom@13:           if (Object.isArray(values))
terom@13:             return values.map(toQueryPair.curry(key)).join('&');
terom@13:         }
terom@13:         return toQueryPair(key, values);
terom@13:       }).join('&');
terom@13:     },
terom@13: 
terom@13:     inspect: function() {
terom@13:       return '#<Hash:{' + this.map(function(pair) {
terom@13:         return pair.map(Object.inspect).join(': ');
terom@13:       }).join(', ') + '}>';
terom@13:     },
terom@13: 
terom@13:     toJSON: function() {
terom@13:       return Object.toJSON(this.toObject());
terom@13:     },
terom@13: 
terom@13:     clone: function() {
terom@13:       return new Hash(this);
terom@13:     }
terom@13:   }
terom@13: })());
terom@13: 
terom@13: Hash.prototype.toTemplateReplacements = Hash.prototype.toObject;
terom@13: Hash.from = $H;
terom@13: var ObjectRange = Class.create(Enumerable, {
terom@13:   initialize: function(start, end, exclusive) {
terom@13:     this.start = start;
terom@13:     this.end = end;
terom@13:     this.exclusive = exclusive;
terom@13:   },
terom@13: 
terom@13:   _each: function(iterator) {
terom@13:     var value = this.start;
terom@13:     while (this.include(value)) {
terom@13:       iterator(value);
terom@13:       value = value.succ();
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   include: function(value) {
terom@13:     if (value < this.start)
terom@13:       return false;
terom@13:     if (this.exclusive)
terom@13:       return value < this.end;
terom@13:     return value <= this.end;
terom@13:   }
terom@13: });
terom@13: 
terom@13: var $R = function(start, end, exclusive) {
terom@13:   return new ObjectRange(start, end, exclusive);
terom@13: };
terom@13: 
terom@13: var Ajax = {
terom@13:   getTransport: function() {
terom@13:     return Try.these(
terom@13:       function() {return new XMLHttpRequest()},
terom@13:       function() {return new ActiveXObject('Msxml2.XMLHTTP')},
terom@13:       function() {return new ActiveXObject('Microsoft.XMLHTTP')}
terom@13:     ) || false;
terom@13:   },
terom@13: 
terom@13:   activeRequestCount: 0
terom@13: };
terom@13: 
terom@13: Ajax.Responders = {
terom@13:   responders: [],
terom@13: 
terom@13:   _each: function(iterator) {
terom@13:     this.responders._each(iterator);
terom@13:   },
terom@13: 
terom@13:   register: function(responder) {
terom@13:     if (!this.include(responder))
terom@13:       this.responders.push(responder);
terom@13:   },
terom@13: 
terom@13:   unregister: function(responder) {
terom@13:     this.responders = this.responders.without(responder);
terom@13:   },
terom@13: 
terom@13:   dispatch: function(callback, request, transport, json) {
terom@13:     this.each(function(responder) {
terom@13:       if (Object.isFunction(responder[callback])) {
terom@13:         try {
terom@13:           responder[callback].apply(responder, [request, transport, json]);
terom@13:         } catch (e) { }
terom@13:       }
terom@13:     });
terom@13:   }
terom@13: };
terom@13: 
terom@13: Object.extend(Ajax.Responders, Enumerable);
terom@13: 
terom@13: Ajax.Responders.register({
terom@13:   onCreate:   function() { Ajax.activeRequestCount++ },
terom@13:   onComplete: function() { Ajax.activeRequestCount-- }
terom@13: });
terom@13: 
terom@13: Ajax.Base = Class.create({
terom@13:   initialize: function(options) {
terom@13:     this.options = {
terom@13:       method:       'post',
terom@13:       asynchronous: true,
terom@13:       contentType:  'application/x-www-form-urlencoded',
terom@13:       encoding:     'UTF-8',
terom@13:       parameters:   '',
terom@13:       evalJSON:     true,
terom@13:       evalJS:       true
terom@13:     };
terom@13:     Object.extend(this.options, options || { });
terom@13: 
terom@13:     this.options.method = this.options.method.toLowerCase();
terom@13: 
terom@13:     if (Object.isString(this.options.parameters))
terom@13:       this.options.parameters = this.options.parameters.toQueryParams();
terom@13:     else if (Object.isHash(this.options.parameters))
terom@13:       this.options.parameters = this.options.parameters.toObject();
terom@13:   }
terom@13: });
terom@13: 
terom@13: Ajax.Request = Class.create(Ajax.Base, {
terom@13:   _complete: false,
terom@13: 
terom@13:   initialize: function($super, url, options) {
terom@13:     $super(options);
terom@13:     this.transport = Ajax.getTransport();
terom@13:     this.request(url);
terom@13:   },
terom@13: 
terom@13:   request: function(url) {
terom@13:     this.url = url;
terom@13:     this.method = this.options.method;
terom@13:     var params = Object.clone(this.options.parameters);
terom@13: 
terom@13:     if (!['get', 'post'].include(this.method)) {
terom@13:       // simulate other verbs over post
terom@13:       params['_method'] = this.method;
terom@13:       this.method = 'post';
terom@13:     }
terom@13: 
terom@13:     this.parameters = params;
terom@13: 
terom@13:     if (params = Object.toQueryString(params)) {
terom@13:       // when GET, append parameters to URL
terom@13:       if (this.method == 'get')
terom@13:         this.url += (this.url.include('?') ? '&' : '?') + params;
terom@13:       else if (/Konqueror|Safari|KHTML/.test(navigator.userAgent))
terom@13:         params += '&_=';
terom@13:     }
terom@13: 
terom@13:     try {
terom@13:       var response = new Ajax.Response(this);
terom@13:       if (this.options.onCreate) this.options.onCreate(response);
terom@13:       Ajax.Responders.dispatch('onCreate', this, response);
terom@13: 
terom@13:       this.transport.open(this.method.toUpperCase(), this.url,
terom@13:         this.options.asynchronous);
terom@13: 
terom@13:       if (this.options.asynchronous) this.respondToReadyState.bind(this).defer(1);
terom@13: 
terom@13:       this.transport.onreadystatechange = this.onStateChange.bind(this);
terom@13:       this.setRequestHeaders();
terom@13: 
terom@13:       this.body = this.method == 'post' ? (this.options.postBody || params) : null;
terom@13:       this.transport.send(this.body);
terom@13: 
terom@13:       /* Force Firefox to handle ready state 4 for synchronous requests */
terom@13:       if (!this.options.asynchronous && this.transport.overrideMimeType)
terom@13:         this.onStateChange();
terom@13: 
terom@13:     }
terom@13:     catch (e) {
terom@13:       this.dispatchException(e);
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   onStateChange: function() {
terom@13:     var readyState = this.transport.readyState;
terom@13:     if (readyState > 1 && !((readyState == 4) && this._complete))
terom@13:       this.respondToReadyState(this.transport.readyState);
terom@13:   },
terom@13: 
terom@13:   setRequestHeaders: function() {
terom@13:     var headers = {
terom@13:       'X-Requested-With': 'XMLHttpRequest',
terom@13:       'X-Prototype-Version': Prototype.Version,
terom@13:       'Accept': 'text/javascript, text/html, application/xml, text/xml, */*'
terom@13:     };
terom@13: 
terom@13:     if (this.method == 'post') {
terom@13:       headers['Content-type'] = this.options.contentType +
terom@13:         (this.options.encoding ? '; charset=' + this.options.encoding : '');
terom@13: 
terom@13:       /* Force "Connection: close" for older Mozilla browsers to work
terom@13:        * around a bug where XMLHttpRequest sends an incorrect
terom@13:        * Content-length header. See Mozilla Bugzilla #246651.
terom@13:        */
terom@13:       if (this.transport.overrideMimeType &&
terom@13:           (navigator.userAgent.match(/Gecko\/(\d{4})/) || [0,2005])[1] < 2005)
terom@13:             headers['Connection'] = 'close';
terom@13:     }
terom@13: 
terom@13:     // user-defined headers
terom@13:     if (typeof this.options.requestHeaders == 'object') {
terom@13:       var extras = this.options.requestHeaders;
terom@13: 
terom@13:       if (Object.isFunction(extras.push))
terom@13:         for (var i = 0, length = extras.length; i < length; i += 2)
terom@13:           headers[extras[i]] = extras[i+1];
terom@13:       else
terom@13:         $H(extras).each(function(pair) { headers[pair.key] = pair.value });
terom@13:     }
terom@13: 
terom@13:     for (var name in headers)
terom@13:       this.transport.setRequestHeader(name, headers[name]);
terom@13:   },
terom@13: 
terom@13:   success: function() {
terom@13:     var status = this.getStatus();
terom@13:     return !status || (status >= 200 && status < 300);
terom@13:   },
terom@13: 
terom@13:   getStatus: function() {
terom@13:     try {
terom@13:       return this.transport.status || 0;
terom@13:     } catch (e) { return 0 }
terom@13:   },
terom@13: 
terom@13:   respondToReadyState: function(readyState) {
terom@13:     var state = Ajax.Request.Events[readyState], response = new Ajax.Response(this);
terom@13: 
terom@13:     if (state == 'Complete') {
terom@13:       try {
terom@13:         this._complete = true;
terom@13:         (this.options['on' + response.status]
terom@13:          || this.options['on' + (this.success() ? 'Success' : 'Failure')]
terom@13:          || Prototype.emptyFunction)(response, response.headerJSON);
terom@13:       } catch (e) {
terom@13:         this.dispatchException(e);
terom@13:       }
terom@13: 
terom@13:       var contentType = response.getHeader('Content-type');
terom@13:       if (this.options.evalJS == 'force'
terom@13:           || (this.options.evalJS && this.isSameOrigin() && contentType
terom@13:           && contentType.match(/^\s*(text|application)\/(x-)?(java|ecma)script(;.*)?\s*$/i)))
terom@13:         this.evalResponse();
terom@13:     }
terom@13: 
terom@13:     try {
terom@13:       (this.options['on' + state] || Prototype.emptyFunction)(response, response.headerJSON);
terom@13:       Ajax.Responders.dispatch('on' + state, this, response, response.headerJSON);
terom@13:     } catch (e) {
terom@13:       this.dispatchException(e);
terom@13:     }
terom@13: 
terom@13:     if (state == 'Complete') {
terom@13:       // avoid memory leak in MSIE: clean up
terom@13:       this.transport.onreadystatechange = Prototype.emptyFunction;
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   isSameOrigin: function() {
terom@13:     var m = this.url.match(/^\s*https?:\/\/[^\/]*/);
terom@13:     return !m || (m[0] == '#{protocol}//#{domain}#{port}'.interpolate({
terom@13:       protocol: location.protocol,
terom@13:       domain: document.domain,
terom@13:       port: location.port ? ':' + location.port : ''
terom@13:     }));
terom@13:   },
terom@13: 
terom@13:   getHeader: function(name) {
terom@13:     try {
terom@13:       return this.transport.getResponseHeader(name) || null;
terom@13:     } catch (e) { return null }
terom@13:   },
terom@13: 
terom@13:   evalResponse: function() {
terom@13:     try {
terom@13:       return eval((this.transport.responseText || '').unfilterJSON());
terom@13:     } catch (e) {
terom@13:       this.dispatchException(e);
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   dispatchException: function(exception) {
terom@13:     (this.options.onException || Prototype.emptyFunction)(this, exception);
terom@13:     Ajax.Responders.dispatch('onException', this, exception);
terom@13:   }
terom@13: });
terom@13: 
terom@13: Ajax.Request.Events =
terom@13:   ['Uninitialized', 'Loading', 'Loaded', 'Interactive', 'Complete'];
terom@13: 
terom@13: Ajax.Response = Class.create({
terom@13:   initialize: function(request){
terom@13:     this.request = request;
terom@13:     var transport  = this.transport  = request.transport,
terom@13:         readyState = this.readyState = transport.readyState;
terom@13: 
terom@13:     if((readyState > 2 && !Prototype.Browser.IE) || readyState == 4) {
terom@13:       this.status       = this.getStatus();
terom@13:       this.statusText   = this.getStatusText();
terom@13:       this.responseText = String.interpret(transport.responseText);
terom@13:       this.headerJSON   = this._getHeaderJSON();
terom@13:     }
terom@13: 
terom@13:     if(readyState == 4) {
terom@13:       var xml = transport.responseXML;
terom@13:       this.responseXML  = Object.isUndefined(xml) ? null : xml;
terom@13:       this.responseJSON = this._getResponseJSON();
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   status:      0,
terom@13:   statusText: '',
terom@13: 
terom@13:   getStatus: Ajax.Request.prototype.getStatus,
terom@13: 
terom@13:   getStatusText: function() {
terom@13:     try {
terom@13:       return this.transport.statusText || '';
terom@13:     } catch (e) { return '' }
terom@13:   },
terom@13: 
terom@13:   getHeader: Ajax.Request.prototype.getHeader,
terom@13: 
terom@13:   getAllHeaders: function() {
terom@13:     try {
terom@13:       return this.getAllResponseHeaders();
terom@13:     } catch (e) { return null }
terom@13:   },
terom@13: 
terom@13:   getResponseHeader: function(name) {
terom@13:     return this.transport.getResponseHeader(name);
terom@13:   },
terom@13: 
terom@13:   getAllResponseHeaders: function() {
terom@13:     return this.transport.getAllResponseHeaders();
terom@13:   },
terom@13: 
terom@13:   _getHeaderJSON: function() {
terom@13:     var json = this.getHeader('X-JSON');
terom@13:     if (!json) return null;
terom@13:     json = decodeURIComponent(escape(json));
terom@13:     try {
terom@13:       return json.evalJSON(this.request.options.sanitizeJSON ||
terom@13:         !this.request.isSameOrigin());
terom@13:     } catch (e) {
terom@13:       this.request.dispatchException(e);
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   _getResponseJSON: function() {
terom@13:     var options = this.request.options;
terom@13:     if (!options.evalJSON || (options.evalJSON != 'force' &&
terom@13:       !(this.getHeader('Content-type') || '').include('application/json')) ||
terom@13:         this.responseText.blank())
terom@13:           return null;
terom@13:     try {
terom@13:       return this.responseText.evalJSON(options.sanitizeJSON ||
terom@13:         !this.request.isSameOrigin());
terom@13:     } catch (e) {
terom@13:       this.request.dispatchException(e);
terom@13:     }
terom@13:   }
terom@13: });
terom@13: 
terom@13: Ajax.Updater = Class.create(Ajax.Request, {
terom@13:   initialize: function($super, container, url, options) {
terom@13:     this.container = {
terom@13:       success: (container.success || container),
terom@13:       failure: (container.failure || (container.success ? null : container))
terom@13:     };
terom@13: 
terom@13:     options = Object.clone(options);
terom@13:     var onComplete = options.onComplete;
terom@13:     options.onComplete = (function(response, json) {
terom@13:       this.updateContent(response.responseText);
terom@13:       if (Object.isFunction(onComplete)) onComplete(response, json);
terom@13:     }).bind(this);
terom@13: 
terom@13:     $super(url, options);
terom@13:   },
terom@13: 
terom@13:   updateContent: function(responseText) {
terom@13:     var receiver = this.container[this.success() ? 'success' : 'failure'],
terom@13:         options = this.options;
terom@13: 
terom@13:     if (!options.evalScripts) responseText = responseText.stripScripts();
terom@13: 
terom@13:     if (receiver = $(receiver)) {
terom@13:       if (options.insertion) {
terom@13:         if (Object.isString(options.insertion)) {
terom@13:           var insertion = { }; insertion[options.insertion] = responseText;
terom@13:           receiver.insert(insertion);
terom@13:         }
terom@13:         else options.insertion(receiver, responseText);
terom@13:       }
terom@13:       else receiver.update(responseText);
terom@13:     }
terom@13:   }
terom@13: });
terom@13: 
terom@13: Ajax.PeriodicalUpdater = Class.create(Ajax.Base, {
terom@13:   initialize: function($super, container, url, options) {
terom@13:     $super(options);
terom@13:     this.onComplete = this.options.onComplete;
terom@13: 
terom@13:     this.frequency = (this.options.frequency || 2);
terom@13:     this.decay = (this.options.decay || 1);
terom@13: 
terom@13:     this.updater = { };
terom@13:     this.container = container;
terom@13:     this.url = url;
terom@13: 
terom@13:     this.start();
terom@13:   },
terom@13: 
terom@13:   start: function() {
terom@13:     this.options.onComplete = this.updateComplete.bind(this);
terom@13:     this.onTimerEvent();
terom@13:   },
terom@13: 
terom@13:   stop: function() {
terom@13:     this.updater.options.onComplete = undefined;
terom@13:     clearTimeout(this.timer);
terom@13:     (this.onComplete || Prototype.emptyFunction).apply(this, arguments);
terom@13:   },
terom@13: 
terom@13:   updateComplete: function(response) {
terom@13:     if (this.options.decay) {
terom@13:       this.decay = (response.responseText == this.lastText ?
terom@13:         this.decay * this.options.decay : 1);
terom@13: 
terom@13:       this.lastText = response.responseText;
terom@13:     }
terom@13:     this.timer = this.onTimerEvent.bind(this).delay(this.decay * this.frequency);
terom@13:   },
terom@13: 
terom@13:   onTimerEvent: function() {
terom@13:     this.updater = new Ajax.Updater(this.container, this.url, this.options);
terom@13:   }
terom@13: });
terom@13: function $(element) {
terom@13:   if (arguments.length > 1) {
terom@13:     for (var i = 0, elements = [], length = arguments.length; i < length; i++)
terom@13:       elements.push($(arguments[i]));
terom@13:     return elements;
terom@13:   }
terom@13:   if (Object.isString(element))
terom@13:     element = document.getElementById(element);
terom@13:   return Element.extend(element);
terom@13: }
terom@13: 
terom@13: if (Prototype.BrowserFeatures.XPath) {
terom@13:   document._getElementsByXPath = function(expression, parentElement) {
terom@13:     var results = [];
terom@13:     var query = document.evaluate(expression, $(parentElement) || document,
terom@13:       null, XPathResult.ORDERED_NODE_SNAPSHOT_TYPE, null);
terom@13:     for (var i = 0, length = query.snapshotLength; i < length; i++)
terom@13:       results.push(Element.extend(query.snapshotItem(i)));
terom@13:     return results;
terom@13:   };
terom@13: }
terom@13: 
terom@13: /*--------------------------------------------------------------------------*/
terom@13: 
terom@13: if (!window.Node) var Node = { };
terom@13: 
terom@13: if (!Node.ELEMENT_NODE) {
terom@13:   // DOM level 2 ECMAScript Language Binding
terom@13:   Object.extend(Node, {
terom@13:     ELEMENT_NODE: 1,
terom@13:     ATTRIBUTE_NODE: 2,
terom@13:     TEXT_NODE: 3,
terom@13:     CDATA_SECTION_NODE: 4,
terom@13:     ENTITY_REFERENCE_NODE: 5,
terom@13:     ENTITY_NODE: 6,
terom@13:     PROCESSING_INSTRUCTION_NODE: 7,
terom@13:     COMMENT_NODE: 8,
terom@13:     DOCUMENT_NODE: 9,
terom@13:     DOCUMENT_TYPE_NODE: 10,
terom@13:     DOCUMENT_FRAGMENT_NODE: 11,
terom@13:     NOTATION_NODE: 12
terom@13:   });
terom@13: }
terom@13: 
terom@13: (function() {
terom@13:   var element = this.Element;
terom@13:   this.Element = function(tagName, attributes) {
terom@13:     attributes = attributes || { };
terom@13:     tagName = tagName.toLowerCase();
terom@13:     var cache = Element.cache;
terom@13:     if (Prototype.Browser.IE && attributes.name) {
terom@13:       tagName = '<' + tagName + ' name="' + attributes.name + '">';
terom@13:       delete attributes.name;
terom@13:       return Element.writeAttribute(document.createElement(tagName), attributes);
terom@13:     }
terom@13:     if (!cache[tagName]) cache[tagName] = Element.extend(document.createElement(tagName));
terom@13:     return Element.writeAttribute(cache[tagName].cloneNode(false), attributes);
terom@13:   };
terom@13:   Object.extend(this.Element, element || { });
terom@13: }).call(window);
terom@13: 
terom@13: Element.cache = { };
terom@13: 
terom@13: Element.Methods = {
terom@13:   visible: function(element) {
terom@13:     return $(element).style.display != 'none';
terom@13:   },
terom@13: 
terom@13:   toggle: function(element) {
terom@13:     element = $(element);
terom@13:     Element[Element.visible(element) ? 'hide' : 'show'](element);
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   hide: function(element) {
terom@13:     $(element).style.display = 'none';
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   show: function(element) {
terom@13:     $(element).style.display = '';
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   remove: function(element) {
terom@13:     element = $(element);
terom@13:     element.parentNode.removeChild(element);
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   update: function(element, content) {
terom@13:     element = $(element);
terom@13:     if (content && content.toElement) content = content.toElement();
terom@13:     if (Object.isElement(content)) return element.update().insert(content);
terom@13:     content = Object.toHTML(content);
terom@13:     element.innerHTML = content.stripScripts();
terom@13:     content.evalScripts.bind(content).defer();
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   replace: function(element, content) {
terom@13:     element = $(element);
terom@13:     if (content && content.toElement) content = content.toElement();
terom@13:     else if (!Object.isElement(content)) {
terom@13:       content = Object.toHTML(content);
terom@13:       var range = element.ownerDocument.createRange();
terom@13:       range.selectNode(element);
terom@13:       content.evalScripts.bind(content).defer();
terom@13:       content = range.createContextualFragment(content.stripScripts());
terom@13:     }
terom@13:     element.parentNode.replaceChild(content, element);
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   insert: function(element, insertions) {
terom@13:     element = $(element);
terom@13: 
terom@13:     if (Object.isString(insertions) || Object.isNumber(insertions) ||
terom@13:         Object.isElement(insertions) || (insertions && (insertions.toElement || insertions.toHTML)))
terom@13:           insertions = {bottom:insertions};
terom@13: 
terom@13:     var content, insert, tagName, childNodes;
terom@13: 
terom@13:     for (var position in insertions) {
terom@13:       content  = insertions[position];
terom@13:       position = position.toLowerCase();
terom@13:       insert = Element._insertionTranslations[position];
terom@13: 
terom@13:       if (content && content.toElement) content = content.toElement();
terom@13:       if (Object.isElement(content)) {
terom@13:         insert(element, content);
terom@13:         continue;
terom@13:       }
terom@13: 
terom@13:       content = Object.toHTML(content);
terom@13: 
terom@13:       tagName = ((position == 'before' || position == 'after')
terom@13:         ? element.parentNode : element).tagName.toUpperCase();
terom@13: 
terom@13:       childNodes = Element._getContentFromAnonymousElement(tagName, content.stripScripts());
terom@13: 
terom@13:       if (position == 'top' || position == 'after') childNodes.reverse();
terom@13:       childNodes.each(insert.curry(element));
terom@13: 
terom@13:       content.evalScripts.bind(content).defer();
terom@13:     }
terom@13: 
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   wrap: function(element, wrapper, attributes) {
terom@13:     element = $(element);
terom@13:     if (Object.isElement(wrapper))
terom@13:       $(wrapper).writeAttribute(attributes || { });
terom@13:     else if (Object.isString(wrapper)) wrapper = new Element(wrapper, attributes);
terom@13:     else wrapper = new Element('div', wrapper);
terom@13:     if (element.parentNode)
terom@13:       element.parentNode.replaceChild(wrapper, element);
terom@13:     wrapper.appendChild(element);
terom@13:     return wrapper;
terom@13:   },
terom@13: 
terom@13:   inspect: function(element) {
terom@13:     element = $(element);
terom@13:     var result = '<' + element.tagName.toLowerCase();
terom@13:     $H({'id': 'id', 'className': 'class'}).each(function(pair) {
terom@13:       var property = pair.first(), attribute = pair.last();
terom@13:       var value = (element[property] || '').toString();
terom@13:       if (value) result += ' ' + attribute + '=' + value.inspect(true);
terom@13:     });
terom@13:     return result + '>';
terom@13:   },
terom@13: 
terom@13:   recursivelyCollect: function(element, property) {
terom@13:     element = $(element);
terom@13:     var elements = [];
terom@13:     while (element = element[property])
terom@13:       if (element.nodeType == 1)
terom@13:         elements.push(Element.extend(element));
terom@13:     return elements;
terom@13:   },
terom@13: 
terom@13:   ancestors: function(element) {
terom@13:     return $(element).recursivelyCollect('parentNode');
terom@13:   },
terom@13: 
terom@13:   descendants: function(element) {
terom@13:     return $(element).select("*");
terom@13:   },
terom@13: 
terom@13:   firstDescendant: function(element) {
terom@13:     element = $(element).firstChild;
terom@13:     while (element && element.nodeType != 1) element = element.nextSibling;
terom@13:     return $(element);
terom@13:   },
terom@13: 
terom@13:   immediateDescendants: function(element) {
terom@13:     if (!(element = $(element).firstChild)) return [];
terom@13:     while (element && element.nodeType != 1) element = element.nextSibling;
terom@13:     if (element) return [element].concat($(element).nextSiblings());
terom@13:     return [];
terom@13:   },
terom@13: 
terom@13:   previousSiblings: function(element) {
terom@13:     return $(element).recursivelyCollect('previousSibling');
terom@13:   },
terom@13: 
terom@13:   nextSiblings: function(element) {
terom@13:     return $(element).recursivelyCollect('nextSibling');
terom@13:   },
terom@13: 
terom@13:   siblings: function(element) {
terom@13:     element = $(element);
terom@13:     return element.previousSiblings().reverse().concat(element.nextSiblings());
terom@13:   },
terom@13: 
terom@13:   match: function(element, selector) {
terom@13:     if (Object.isString(selector))
terom@13:       selector = new Selector(selector);
terom@13:     return selector.match($(element));
terom@13:   },
terom@13: 
terom@13:   up: function(element, expression, index) {
terom@13:     element = $(element);
terom@13:     if (arguments.length == 1) return $(element.parentNode);
terom@13:     var ancestors = element.ancestors();
terom@13:     return Object.isNumber(expression) ? ancestors[expression] :
terom@13:       Selector.findElement(ancestors, expression, index);
terom@13:   },
terom@13: 
terom@13:   down: function(element, expression, index) {
terom@13:     element = $(element);
terom@13:     if (arguments.length == 1) return element.firstDescendant();
terom@13:     return Object.isNumber(expression) ? element.descendants()[expression] :
terom@13:       element.select(expression)[index || 0];
terom@13:   },
terom@13: 
terom@13:   previous: function(element, expression, index) {
terom@13:     element = $(element);
terom@13:     if (arguments.length == 1) return $(Selector.handlers.previousElementSibling(element));
terom@13:     var previousSiblings = element.previousSiblings();
terom@13:     return Object.isNumber(expression) ? previousSiblings[expression] :
terom@13:       Selector.findElement(previousSiblings, expression, index);
terom@13:   },
terom@13: 
terom@13:   next: function(element, expression, index) {
terom@13:     element = $(element);
terom@13:     if (arguments.length == 1) return $(Selector.handlers.nextElementSibling(element));
terom@13:     var nextSiblings = element.nextSiblings();
terom@13:     return Object.isNumber(expression) ? nextSiblings[expression] :
terom@13:       Selector.findElement(nextSiblings, expression, index);
terom@13:   },
terom@13: 
terom@13:   select: function() {
terom@13:     var args = $A(arguments), element = $(args.shift());
terom@13:     return Selector.findChildElements(element, args);
terom@13:   },
terom@13: 
terom@13:   adjacent: function() {
terom@13:     var args = $A(arguments), element = $(args.shift());
terom@13:     return Selector.findChildElements(element.parentNode, args).without(element);
terom@13:   },
terom@13: 
terom@13:   identify: function(element) {
terom@13:     element = $(element);
terom@13:     var id = element.readAttribute('id'), self = arguments.callee;
terom@13:     if (id) return id;
terom@13:     do { id = 'anonymous_element_' + self.counter++ } while ($(id));
terom@13:     element.writeAttribute('id', id);
terom@13:     return id;
terom@13:   },
terom@13: 
terom@13:   readAttribute: function(element, name) {
terom@13:     element = $(element);
terom@13:     if (Prototype.Browser.IE) {
terom@13:       var t = Element._attributeTranslations.read;
terom@13:       if (t.values[name]) return t.values[name](element, name);
terom@13:       if (t.names[name]) name = t.names[name];
terom@13:       if (name.include(':')) {
terom@13:         return (!element.attributes || !element.attributes[name]) ? null :
terom@13:          element.attributes[name].value;
terom@13:       }
terom@13:     }
terom@13:     return element.getAttribute(name);
terom@13:   },
terom@13: 
terom@13:   writeAttribute: function(element, name, value) {
terom@13:     element = $(element);
terom@13:     var attributes = { }, t = Element._attributeTranslations.write;
terom@13: 
terom@13:     if (typeof name == 'object') attributes = name;
terom@13:     else attributes[name] = Object.isUndefined(value) ? true : value;
terom@13: 
terom@13:     for (var attr in attributes) {
terom@13:       name = t.names[attr] || attr;
terom@13:       value = attributes[attr];
terom@13:       if (t.values[attr]) name = t.values[attr](element, value);
terom@13:       if (value === false || value === null)
terom@13:         element.removeAttribute(name);
terom@13:       else if (value === true)
terom@13:         element.setAttribute(name, name);
terom@13:       else element.setAttribute(name, value);
terom@13:     }
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   getHeight: function(element) {
terom@13:     return $(element).getDimensions().height;
terom@13:   },
terom@13: 
terom@13:   getWidth: function(element) {
terom@13:     return $(element).getDimensions().width;
terom@13:   },
terom@13: 
terom@13:   classNames: function(element) {
terom@13:     return new Element.ClassNames(element);
terom@13:   },
terom@13: 
terom@13:   hasClassName: function(element, className) {
terom@13:     if (!(element = $(element))) return;
terom@13:     var elementClassName = element.className;
terom@13:     return (elementClassName.length > 0 && (elementClassName == className ||
terom@13:       new RegExp("(^|\\s)" + className + "(\\s|$)").test(elementClassName)));
terom@13:   },
terom@13: 
terom@13:   addClassName: function(element, className) {
terom@13:     if (!(element = $(element))) return;
terom@13:     if (!element.hasClassName(className))
terom@13:       element.className += (element.className ? ' ' : '') + className;
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   removeClassName: function(element, className) {
terom@13:     if (!(element = $(element))) return;
terom@13:     element.className = element.className.replace(
terom@13:       new RegExp("(^|\\s+)" + className + "(\\s+|$)"), ' ').strip();
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   toggleClassName: function(element, className) {
terom@13:     if (!(element = $(element))) return;
terom@13:     return element[element.hasClassName(className) ?
terom@13:       'removeClassName' : 'addClassName'](className);
terom@13:   },
terom@13: 
terom@13:   // removes whitespace-only text node children
terom@13:   cleanWhitespace: function(element) {
terom@13:     element = $(element);
terom@13:     var node = element.firstChild;
terom@13:     while (node) {
terom@13:       var nextNode = node.nextSibling;
terom@13:       if (node.nodeType == 3 && !/\S/.test(node.nodeValue))
terom@13:         element.removeChild(node);
terom@13:       node = nextNode;
terom@13:     }
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   empty: function(element) {
terom@13:     return $(element).innerHTML.blank();
terom@13:   },
terom@13: 
terom@13:   descendantOf: function(element, ancestor) {
terom@13:     element = $(element), ancestor = $(ancestor);
terom@13:     var originalAncestor = ancestor;
terom@13: 
terom@13:     if (element.compareDocumentPosition)
terom@13:       return (element.compareDocumentPosition(ancestor) & 8) === 8;
terom@13: 
terom@13:     if (element.sourceIndex && !Prototype.Browser.Opera) {
terom@13:       var e = element.sourceIndex, a = ancestor.sourceIndex,
terom@13:        nextAncestor = ancestor.nextSibling;
terom@13:       if (!nextAncestor) {
terom@13:         do { ancestor = ancestor.parentNode; }
terom@13:         while (!(nextAncestor = ancestor.nextSibling) && ancestor.parentNode);
terom@13:       }
terom@13:       if (nextAncestor && nextAncestor.sourceIndex)
terom@13:        return (e > a && e < nextAncestor.sourceIndex);
terom@13:     }
terom@13: 
terom@13:     while (element = element.parentNode)
terom@13:       if (element == originalAncestor) return true;
terom@13:     return false;
terom@13:   },
terom@13: 
terom@13:   scrollTo: function(element) {
terom@13:     element = $(element);
terom@13:     var pos = element.cumulativeOffset();
terom@13:     window.scrollTo(pos[0], pos[1]);
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   getStyle: function(element, style) {
terom@13:     element = $(element);
terom@13:     style = style == 'float' ? 'cssFloat' : style.camelize();
terom@13:     var value = element.style[style];
terom@13:     if (!value) {
terom@13:       var css = document.defaultView.getComputedStyle(element, null);
terom@13:       value = css ? css[style] : null;
terom@13:     }
terom@13:     if (style == 'opacity') return value ? parseFloat(value) : 1.0;
terom@13:     return value == 'auto' ? null : value;
terom@13:   },
terom@13: 
terom@13:   getOpacity: function(element) {
terom@13:     return $(element).getStyle('opacity');
terom@13:   },
terom@13: 
terom@13:   setStyle: function(element, styles) {
terom@13:     element = $(element);
terom@13:     var elementStyle = element.style, match;
terom@13:     if (Object.isString(styles)) {
terom@13:       element.style.cssText += ';' + styles;
terom@13:       return styles.include('opacity') ?
terom@13:         element.setOpacity(styles.match(/opacity:\s*(\d?\.?\d*)/)[1]) : element;
terom@13:     }
terom@13:     for (var property in styles)
terom@13:       if (property == 'opacity') element.setOpacity(styles[property]);
terom@13:       else
terom@13:         elementStyle[(property == 'float' || property == 'cssFloat') ?
terom@13:           (Object.isUndefined(elementStyle.styleFloat) ? 'cssFloat' : 'styleFloat') :
terom@13:             property] = styles[property];
terom@13: 
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   setOpacity: function(element, value) {
terom@13:     element = $(element);
terom@13:     element.style.opacity = (value == 1 || value === '') ? '' :
terom@13:       (value < 0.00001) ? 0 : value;
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   getDimensions: function(element) {
terom@13:     element = $(element);
terom@13:     var display = $(element).getStyle('display');
terom@13:     if (display != 'none' && display != null) // Safari bug
terom@13:       return {width: element.offsetWidth, height: element.offsetHeight};
terom@13: 
terom@13:     // All *Width and *Height properties give 0 on elements with display none,
terom@13:     // so enable the element temporarily
terom@13:     var els = element.style;
terom@13:     var originalVisibility = els.visibility;
terom@13:     var originalPosition = els.position;
terom@13:     var originalDisplay = els.display;
terom@13:     els.visibility = 'hidden';
terom@13:     els.position = 'absolute';
terom@13:     els.display = 'block';
terom@13:     var originalWidth = element.clientWidth;
terom@13:     var originalHeight = element.clientHeight;
terom@13:     els.display = originalDisplay;
terom@13:     els.position = originalPosition;
terom@13:     els.visibility = originalVisibility;
terom@13:     return {width: originalWidth, height: originalHeight};
terom@13:   },
terom@13: 
terom@13:   makePositioned: function(element) {
terom@13:     element = $(element);
terom@13:     var pos = Element.getStyle(element, 'position');
terom@13:     if (pos == 'static' || !pos) {
terom@13:       element._madePositioned = true;
terom@13:       element.style.position = 'relative';
terom@13:       // Opera returns the offset relative to the positioning context, when an
terom@13:       // element is position relative but top and left have not been defined
terom@13:       if (window.opera) {
terom@13:         element.style.top = 0;
terom@13:         element.style.left = 0;
terom@13:       }
terom@13:     }
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   undoPositioned: function(element) {
terom@13:     element = $(element);
terom@13:     if (element._madePositioned) {
terom@13:       element._madePositioned = undefined;
terom@13:       element.style.position =
terom@13:         element.style.top =
terom@13:         element.style.left =
terom@13:         element.style.bottom =
terom@13:         element.style.right = '';
terom@13:     }
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   makeClipping: function(element) {
terom@13:     element = $(element);
terom@13:     if (element._overflow) return element;
terom@13:     element._overflow = Element.getStyle(element, 'overflow') || 'auto';
terom@13:     if (element._overflow !== 'hidden')
terom@13:       element.style.overflow = 'hidden';
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   undoClipping: function(element) {
terom@13:     element = $(element);
terom@13:     if (!element._overflow) return element;
terom@13:     element.style.overflow = element._overflow == 'auto' ? '' : element._overflow;
terom@13:     element._overflow = null;
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   cumulativeOffset: function(element) {
terom@13:     var valueT = 0, valueL = 0;
terom@13:     do {
terom@13:       valueT += element.offsetTop  || 0;
terom@13:       valueL += element.offsetLeft || 0;
terom@13:       element = element.offsetParent;
terom@13:     } while (element);
terom@13:     return Element._returnOffset(valueL, valueT);
terom@13:   },
terom@13: 
terom@13:   positionedOffset: function(element) {
terom@13:     var valueT = 0, valueL = 0;
terom@13:     do {
terom@13:       valueT += element.offsetTop  || 0;
terom@13:       valueL += element.offsetLeft || 0;
terom@13:       element = element.offsetParent;
terom@13:       if (element) {
terom@13:         if (element.tagName == 'BODY') break;
terom@13:         var p = Element.getStyle(element, 'position');
terom@13:         if (p !== 'static') break;
terom@13:       }
terom@13:     } while (element);
terom@13:     return Element._returnOffset(valueL, valueT);
terom@13:   },
terom@13: 
terom@13:   absolutize: function(element) {
terom@13:     element = $(element);
terom@13:     if (element.getStyle('position') == 'absolute') return;
terom@13:     // Position.prepare(); // To be done manually by Scripty when it needs it.
terom@13: 
terom@13:     var offsets = element.positionedOffset();
terom@13:     var top     = offsets[1];
terom@13:     var left    = offsets[0];
terom@13:     var width   = element.clientWidth;
terom@13:     var height  = element.clientHeight;
terom@13: 
terom@13:     element._originalLeft   = left - parseFloat(element.style.left  || 0);
terom@13:     element._originalTop    = top  - parseFloat(element.style.top || 0);
terom@13:     element._originalWidth  = element.style.width;
terom@13:     element._originalHeight = element.style.height;
terom@13: 
terom@13:     element.style.position = 'absolute';
terom@13:     element.style.top    = top + 'px';
terom@13:     element.style.left   = left + 'px';
terom@13:     element.style.width  = width + 'px';
terom@13:     element.style.height = height + 'px';
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   relativize: function(element) {
terom@13:     element = $(element);
terom@13:     if (element.getStyle('position') == 'relative') return;
terom@13:     // Position.prepare(); // To be done manually by Scripty when it needs it.
terom@13: 
terom@13:     element.style.position = 'relative';
terom@13:     var top  = parseFloat(element.style.top  || 0) - (element._originalTop || 0);
terom@13:     var left = parseFloat(element.style.left || 0) - (element._originalLeft || 0);
terom@13: 
terom@13:     element.style.top    = top + 'px';
terom@13:     element.style.left   = left + 'px';
terom@13:     element.style.height = element._originalHeight;
terom@13:     element.style.width  = element._originalWidth;
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   cumulativeScrollOffset: function(element) {
terom@13:     var valueT = 0, valueL = 0;
terom@13:     do {
terom@13:       valueT += element.scrollTop  || 0;
terom@13:       valueL += element.scrollLeft || 0;
terom@13:       element = element.parentNode;
terom@13:     } while (element);
terom@13:     return Element._returnOffset(valueL, valueT);
terom@13:   },
terom@13: 
terom@13:   getOffsetParent: function(element) {
terom@13:     if (element.offsetParent) return $(element.offsetParent);
terom@13:     if (element == document.body) return $(element);
terom@13: 
terom@13:     while ((element = element.parentNode) && element != document.body)
terom@13:       if (Element.getStyle(element, 'position') != 'static')
terom@13:         return $(element);
terom@13: 
terom@13:     return $(document.body);
terom@13:   },
terom@13: 
terom@13:   viewportOffset: function(forElement) {
terom@13:     var valueT = 0, valueL = 0;
terom@13: 
terom@13:     var element = forElement;
terom@13:     do {
terom@13:       valueT += element.offsetTop  || 0;
terom@13:       valueL += element.offsetLeft || 0;
terom@13: 
terom@13:       // Safari fix
terom@13:       if (element.offsetParent == document.body &&
terom@13:         Element.getStyle(element, 'position') == 'absolute') break;
terom@13: 
terom@13:     } while (element = element.offsetParent);
terom@13: 
terom@13:     element = forElement;
terom@13:     do {
terom@13:       if (!Prototype.Browser.Opera || element.tagName == 'BODY') {
terom@13:         valueT -= element.scrollTop  || 0;
terom@13:         valueL -= element.scrollLeft || 0;
terom@13:       }
terom@13:     } while (element = element.parentNode);
terom@13: 
terom@13:     return Element._returnOffset(valueL, valueT);
terom@13:   },
terom@13: 
terom@13:   clonePosition: function(element, source) {
terom@13:     var options = Object.extend({
terom@13:       setLeft:    true,
terom@13:       setTop:     true,
terom@13:       setWidth:   true,
terom@13:       setHeight:  true,
terom@13:       offsetTop:  0,
terom@13:       offsetLeft: 0
terom@13:     }, arguments[2] || { });
terom@13: 
terom@13:     // find page position of source
terom@13:     source = $(source);
terom@13:     var p = source.viewportOffset();
terom@13: 
terom@13:     // find coordinate system to use
terom@13:     element = $(element);
terom@13:     var delta = [0, 0];
terom@13:     var parent = null;
terom@13:     // delta [0,0] will do fine with position: fixed elements,
terom@13:     // position:absolute needs offsetParent deltas
terom@13:     if (Element.getStyle(element, 'position') == 'absolute') {
terom@13:       parent = element.getOffsetParent();
terom@13:       delta = parent.viewportOffset();
terom@13:     }
terom@13: 
terom@13:     // correct by body offsets (fixes Safari)
terom@13:     if (parent == document.body) {
terom@13:       delta[0] -= document.body.offsetLeft;
terom@13:       delta[1] -= document.body.offsetTop;
terom@13:     }
terom@13: 
terom@13:     // set position
terom@13:     if (options.setLeft)   element.style.left  = (p[0] - delta[0] + options.offsetLeft) + 'px';
terom@13:     if (options.setTop)    element.style.top   = (p[1] - delta[1] + options.offsetTop) + 'px';
terom@13:     if (options.setWidth)  element.style.width = source.offsetWidth + 'px';
terom@13:     if (options.setHeight) element.style.height = source.offsetHeight + 'px';
terom@13:     return element;
terom@13:   }
terom@13: };
terom@13: 
terom@13: Element.Methods.identify.counter = 1;
terom@13: 
terom@13: Object.extend(Element.Methods, {
terom@13:   getElementsBySelector: Element.Methods.select,
terom@13:   childElements: Element.Methods.immediateDescendants
terom@13: });
terom@13: 
terom@13: Element._attributeTranslations = {
terom@13:   write: {
terom@13:     names: {
terom@13:       className: 'class',
terom@13:       htmlFor:   'for'
terom@13:     },
terom@13:     values: { }
terom@13:   }
terom@13: };
terom@13: 
terom@13: if (Prototype.Browser.Opera) {
terom@13:   Element.Methods.getStyle = Element.Methods.getStyle.wrap(
terom@13:     function(proceed, element, style) {
terom@13:       switch (style) {
terom@13:         case 'left': case 'top': case 'right': case 'bottom':
terom@13:           if (proceed(element, 'position') === 'static') return null;
terom@13:         case 'height': case 'width':
terom@13:           // returns '0px' for hidden elements; we want it to return null
terom@13:           if (!Element.visible(element)) return null;
terom@13: 
terom@13:           // returns the border-box dimensions rather than the content-box
terom@13:           // dimensions, so we subtract padding and borders from the value
terom@13:           var dim = parseInt(proceed(element, style), 10);
terom@13: 
terom@13:           if (dim !== element['offset' + style.capitalize()])
terom@13:             return dim + 'px';
terom@13: 
terom@13:           var properties;
terom@13:           if (style === 'height') {
terom@13:             properties = ['border-top-width', 'padding-top',
terom@13:              'padding-bottom', 'border-bottom-width'];
terom@13:           }
terom@13:           else {
terom@13:             properties = ['border-left-width', 'padding-left',
terom@13:              'padding-right', 'border-right-width'];
terom@13:           }
terom@13:           return properties.inject(dim, function(memo, property) {
terom@13:             var val = proceed(element, property);
terom@13:             return val === null ? memo : memo - parseInt(val, 10);
terom@13:           }) + 'px';
terom@13:         default: return proceed(element, style);
terom@13:       }
terom@13:     }
terom@13:   );
terom@13: 
terom@13:   Element.Methods.readAttribute = Element.Methods.readAttribute.wrap(
terom@13:     function(proceed, element, attribute) {
terom@13:       if (attribute === 'title') return element.title;
terom@13:       return proceed(element, attribute);
terom@13:     }
terom@13:   );
terom@13: }
terom@13: 
terom@13: else if (Prototype.Browser.IE) {
terom@13:   // IE doesn't report offsets correctly for static elements, so we change them
terom@13:   // to "relative" to get the values, then change them back.
terom@13:   Element.Methods.getOffsetParent = Element.Methods.getOffsetParent.wrap(
terom@13:     function(proceed, element) {
terom@13:       element = $(element);
terom@13:       var position = element.getStyle('position');
terom@13:       if (position !== 'static') return proceed(element);
terom@13:       element.setStyle({ position: 'relative' });
terom@13:       var value = proceed(element);
terom@13:       element.setStyle({ position: position });
terom@13:       return value;
terom@13:     }
terom@13:   );
terom@13: 
terom@13:   $w('positionedOffset viewportOffset').each(function(method) {
terom@13:     Element.Methods[method] = Element.Methods[method].wrap(
terom@13:       function(proceed, element) {
terom@13:         element = $(element);
terom@13:         var position = element.getStyle('position');
terom@13:         if (position !== 'static') return proceed(element);
terom@13:         // Trigger hasLayout on the offset parent so that IE6 reports
terom@13:         // accurate offsetTop and offsetLeft values for position: fixed.
terom@13:         var offsetParent = element.getOffsetParent();
terom@13:         if (offsetParent && offsetParent.getStyle('position') === 'fixed')
terom@13:           offsetParent.setStyle({ zoom: 1 });
terom@13:         element.setStyle({ position: 'relative' });
terom@13:         var value = proceed(element);
terom@13:         element.setStyle({ position: position });
terom@13:         return value;
terom@13:       }
terom@13:     );
terom@13:   });
terom@13: 
terom@13:   Element.Methods.getStyle = function(element, style) {
terom@13:     element = $(element);
terom@13:     style = (style == 'float' || style == 'cssFloat') ? 'styleFloat' : style.camelize();
terom@13:     var value = element.style[style];
terom@13:     if (!value && element.currentStyle) value = element.currentStyle[style];
terom@13: 
terom@13:     if (style == 'opacity') {
terom@13:       if (value = (element.getStyle('filter') || '').match(/alpha\(opacity=(.*)\)/))
terom@13:         if (value[1]) return parseFloat(value[1]) / 100;
terom@13:       return 1.0;
terom@13:     }
terom@13: 
terom@13:     if (value == 'auto') {
terom@13:       if ((style == 'width' || style == 'height') && (element.getStyle('display') != 'none'))
terom@13:         return element['offset' + style.capitalize()] + 'px';
terom@13:       return null;
terom@13:     }
terom@13:     return value;
terom@13:   };
terom@13: 
terom@13:   Element.Methods.setOpacity = function(element, value) {
terom@13:     function stripAlpha(filter){
terom@13:       return filter.replace(/alpha\([^\)]*\)/gi,'');
terom@13:     }
terom@13:     element = $(element);
terom@13:     var currentStyle = element.currentStyle;
terom@13:     if ((currentStyle && !currentStyle.hasLayout) ||
terom@13:       (!currentStyle && element.style.zoom == 'normal'))
terom@13:         element.style.zoom = 1;
terom@13: 
terom@13:     var filter = element.getStyle('filter'), style = element.style;
terom@13:     if (value == 1 || value === '') {
terom@13:       (filter = stripAlpha(filter)) ?
terom@13:         style.filter = filter : style.removeAttribute('filter');
terom@13:       return element;
terom@13:     } else if (value < 0.00001) value = 0;
terom@13:     style.filter = stripAlpha(filter) +
terom@13:       'alpha(opacity=' + (value * 100) + ')';
terom@13:     return element;
terom@13:   };
terom@13: 
terom@13:   Element._attributeTranslations = {
terom@13:     read: {
terom@13:       names: {
terom@13:         'class': 'className',
terom@13:         'for':   'htmlFor'
terom@13:       },
terom@13:       values: {
terom@13:         _getAttr: function(element, attribute) {
terom@13:           return element.getAttribute(attribute, 2);
terom@13:         },
terom@13:         _getAttrNode: function(element, attribute) {
terom@13:           var node = element.getAttributeNode(attribute);
terom@13:           return node ? node.value : "";
terom@13:         },
terom@13:         _getEv: function(element, attribute) {
terom@13:           attribute = element.getAttribute(attribute);
terom@13:           return attribute ? attribute.toString().slice(23, -2) : null;
terom@13:         },
terom@13:         _flag: function(element, attribute) {
terom@13:           return $(element).hasAttribute(attribute) ? attribute : null;
terom@13:         },
terom@13:         style: function(element) {
terom@13:           return element.style.cssText.toLowerCase();
terom@13:         },
terom@13:         title: function(element) {
terom@13:           return element.title;
terom@13:         }
terom@13:       }
terom@13:     }
terom@13:   };
terom@13: 
terom@13:   Element._attributeTranslations.write = {
terom@13:     names: Object.extend({
terom@13:       cellpadding: 'cellPadding',
terom@13:       cellspacing: 'cellSpacing'
terom@13:     }, Element._attributeTranslations.read.names),
terom@13:     values: {
terom@13:       checked: function(element, value) {
terom@13:         element.checked = !!value;
terom@13:       },
terom@13: 
terom@13:       style: function(element, value) {
terom@13:         element.style.cssText = value ? value : '';
terom@13:       }
terom@13:     }
terom@13:   };
terom@13: 
terom@13:   Element._attributeTranslations.has = {};
terom@13: 
terom@13:   $w('colSpan rowSpan vAlign dateTime accessKey tabIndex ' +
terom@13:       'encType maxLength readOnly longDesc').each(function(attr) {
terom@13:     Element._attributeTranslations.write.names[attr.toLowerCase()] = attr;
terom@13:     Element._attributeTranslations.has[attr.toLowerCase()] = attr;
terom@13:   });
terom@13: 
terom@13:   (function(v) {
terom@13:     Object.extend(v, {
terom@13:       href:        v._getAttr,
terom@13:       src:         v._getAttr,
terom@13:       type:        v._getAttr,
terom@13:       action:      v._getAttrNode,
terom@13:       disabled:    v._flag,
terom@13:       checked:     v._flag,
terom@13:       readonly:    v._flag,
terom@13:       multiple:    v._flag,
terom@13:       onload:      v._getEv,
terom@13:       onunload:    v._getEv,
terom@13:       onclick:     v._getEv,
terom@13:       ondblclick:  v._getEv,
terom@13:       onmousedown: v._getEv,
terom@13:       onmouseup:   v._getEv,
terom@13:       onmouseover: v._getEv,
terom@13:       onmousemove: v._getEv,
terom@13:       onmouseout:  v._getEv,
terom@13:       onfocus:     v._getEv,
terom@13:       onblur:      v._getEv,
terom@13:       onkeypress:  v._getEv,
terom@13:       onkeydown:   v._getEv,
terom@13:       onkeyup:     v._getEv,
terom@13:       onsubmit:    v._getEv,
terom@13:       onreset:     v._getEv,
terom@13:       onselect:    v._getEv,
terom@13:       onchange:    v._getEv
terom@13:     });
terom@13:   })(Element._attributeTranslations.read.values);
terom@13: }
terom@13: 
terom@13: else if (Prototype.Browser.Gecko && /rv:1\.8\.0/.test(navigator.userAgent)) {
terom@13:   Element.Methods.setOpacity = function(element, value) {
terom@13:     element = $(element);
terom@13:     element.style.opacity = (value == 1) ? 0.999999 :
terom@13:       (value === '') ? '' : (value < 0.00001) ? 0 : value;
terom@13:     return element;
terom@13:   };
terom@13: }
terom@13: 
terom@13: else if (Prototype.Browser.WebKit) {
terom@13:   Element.Methods.setOpacity = function(element, value) {
terom@13:     element = $(element);
terom@13:     element.style.opacity = (value == 1 || value === '') ? '' :
terom@13:       (value < 0.00001) ? 0 : value;
terom@13: 
terom@13:     if (value == 1)
terom@13:       if(element.tagName == 'IMG' && element.width) {
terom@13:         element.width++; element.width--;
terom@13:       } else try {
terom@13:         var n = document.createTextNode(' ');
terom@13:         element.appendChild(n);
terom@13:         element.removeChild(n);
terom@13:       } catch (e) { }
terom@13: 
terom@13:     return element;
terom@13:   };
terom@13: 
terom@13:   // Safari returns margins on body which is incorrect if the child is absolutely
terom@13:   // positioned.  For performance reasons, redefine Element#cumulativeOffset for
terom@13:   // KHTML/WebKit only.
terom@13:   Element.Methods.cumulativeOffset = function(element) {
terom@13:     var valueT = 0, valueL = 0;
terom@13:     do {
terom@13:       valueT += element.offsetTop  || 0;
terom@13:       valueL += element.offsetLeft || 0;
terom@13:       if (element.offsetParent == document.body)
terom@13:         if (Element.getStyle(element, 'position') == 'absolute') break;
terom@13: 
terom@13:       element = element.offsetParent;
terom@13:     } while (element);
terom@13: 
terom@13:     return Element._returnOffset(valueL, valueT);
terom@13:   };
terom@13: }
terom@13: 
terom@13: if (Prototype.Browser.IE || Prototype.Browser.Opera) {
terom@13:   // IE and Opera are missing .innerHTML support for TABLE-related and SELECT elements
terom@13:   Element.Methods.update = function(element, content) {
terom@13:     element = $(element);
terom@13: 
terom@13:     if (content && content.toElement) content = content.toElement();
terom@13:     if (Object.isElement(content)) return element.update().insert(content);
terom@13: 
terom@13:     content = Object.toHTML(content);
terom@13:     var tagName = element.tagName.toUpperCase();
terom@13: 
terom@13:     if (tagName in Element._insertionTranslations.tags) {
terom@13:       $A(element.childNodes).each(function(node) { element.removeChild(node) });
terom@13:       Element._getContentFromAnonymousElement(tagName, content.stripScripts())
terom@13:         .each(function(node) { element.appendChild(node) });
terom@13:     }
terom@13:     else element.innerHTML = content.stripScripts();
terom@13: 
terom@13:     content.evalScripts.bind(content).defer();
terom@13:     return element;
terom@13:   };
terom@13: }
terom@13: 
terom@13: if ('outerHTML' in document.createElement('div')) {
terom@13:   Element.Methods.replace = function(element, content) {
terom@13:     element = $(element);
terom@13: 
terom@13:     if (content && content.toElement) content = content.toElement();
terom@13:     if (Object.isElement(content)) {
terom@13:       element.parentNode.replaceChild(content, element);
terom@13:       return element;
terom@13:     }
terom@13: 
terom@13:     content = Object.toHTML(content);
terom@13:     var parent = element.parentNode, tagName = parent.tagName.toUpperCase();
terom@13: 
terom@13:     if (Element._insertionTranslations.tags[tagName]) {
terom@13:       var nextSibling = element.next();
terom@13:       var fragments = Element._getContentFromAnonymousElement(tagName, content.stripScripts());
terom@13:       parent.removeChild(element);
terom@13:       if (nextSibling)
terom@13:         fragments.each(function(node) { parent.insertBefore(node, nextSibling) });
terom@13:       else
terom@13:         fragments.each(function(node) { parent.appendChild(node) });
terom@13:     }
terom@13:     else element.outerHTML = content.stripScripts();
terom@13: 
terom@13:     content.evalScripts.bind(content).defer();
terom@13:     return element;
terom@13:   };
terom@13: }
terom@13: 
terom@13: Element._returnOffset = function(l, t) {
terom@13:   var result = [l, t];
terom@13:   result.left = l;
terom@13:   result.top = t;
terom@13:   return result;
terom@13: };
terom@13: 
terom@13: Element._getContentFromAnonymousElement = function(tagName, html) {
terom@13:   var div = new Element('div'), t = Element._insertionTranslations.tags[tagName];
terom@13:   if (t) {
terom@13:     div.innerHTML = t[0] + html + t[1];
terom@13:     t[2].times(function() { div = div.firstChild });
terom@13:   } else div.innerHTML = html;
terom@13:   return $A(div.childNodes);
terom@13: };
terom@13: 
terom@13: Element._insertionTranslations = {
terom@13:   before: function(element, node) {
terom@13:     element.parentNode.insertBefore(node, element);
terom@13:   },
terom@13:   top: function(element, node) {
terom@13:     element.insertBefore(node, element.firstChild);
terom@13:   },
terom@13:   bottom: function(element, node) {
terom@13:     element.appendChild(node);
terom@13:   },
terom@13:   after: function(element, node) {
terom@13:     element.parentNode.insertBefore(node, element.nextSibling);
terom@13:   },
terom@13:   tags: {
terom@13:     TABLE:  ['<table>',                '</table>',                   1],
terom@13:     TBODY:  ['<table><tbody>',         '</tbody></table>',           2],
terom@13:     TR:     ['<table><tbody><tr>',     '</tr></tbody></table>',      3],
terom@13:     TD:     ['<table><tbody><tr><td>', '</td></tr></tbody></table>', 4],
terom@13:     SELECT: ['<select>',               '</select>',                  1]
terom@13:   }
terom@13: };
terom@13: 
terom@13: (function() {
terom@13:   Object.extend(this.tags, {
terom@13:     THEAD: this.tags.TBODY,
terom@13:     TFOOT: this.tags.TBODY,
terom@13:     TH:    this.tags.TD
terom@13:   });
terom@13: }).call(Element._insertionTranslations);
terom@13: 
terom@13: Element.Methods.Simulated = {
terom@13:   hasAttribute: function(element, attribute) {
terom@13:     attribute = Element._attributeTranslations.has[attribute] || attribute;
terom@13:     var node = $(element).getAttributeNode(attribute);
terom@13:     return node && node.specified;
terom@13:   }
terom@13: };
terom@13: 
terom@13: Element.Methods.ByTag = { };
terom@13: 
terom@13: Object.extend(Element, Element.Methods);
terom@13: 
terom@13: if (!Prototype.BrowserFeatures.ElementExtensions &&
terom@13:     document.createElement('div').__proto__) {
terom@13:   window.HTMLElement = { };
terom@13:   window.HTMLElement.prototype = document.createElement('div').__proto__;
terom@13:   Prototype.BrowserFeatures.ElementExtensions = true;
terom@13: }
terom@13: 
terom@13: Element.extend = (function() {
terom@13:   if (Prototype.BrowserFeatures.SpecificElementExtensions)
terom@13:     return Prototype.K;
terom@13: 
terom@13:   var Methods = { }, ByTag = Element.Methods.ByTag;
terom@13: 
terom@13:   var extend = Object.extend(function(element) {
terom@13:     if (!element || element._extendedByPrototype ||
terom@13:         element.nodeType != 1 || element == window) return element;
terom@13: 
terom@13:     var methods = Object.clone(Methods),
terom@13:       tagName = element.tagName, property, value;
terom@13: 
terom@13:     // extend methods for specific tags
terom@13:     if (ByTag[tagName]) Object.extend(methods, ByTag[tagName]);
terom@13: 
terom@13:     for (property in methods) {
terom@13:       value = methods[property];
terom@13:       if (Object.isFunction(value) && !(property in element))
terom@13:         element[property] = value.methodize();
terom@13:     }
terom@13: 
terom@13:     element._extendedByPrototype = Prototype.emptyFunction;
terom@13:     return element;
terom@13: 
terom@13:   }, {
terom@13:     refresh: function() {
terom@13:       // extend methods for all tags (Safari doesn't need this)
terom@13:       if (!Prototype.BrowserFeatures.ElementExtensions) {
terom@13:         Object.extend(Methods, Element.Methods);
terom@13:         Object.extend(Methods, Element.Methods.Simulated);
terom@13:       }
terom@13:     }
terom@13:   });
terom@13: 
terom@13:   extend.refresh();
terom@13:   return extend;
terom@13: })();
terom@13: 
terom@13: Element.hasAttribute = function(element, attribute) {
terom@13:   if (element.hasAttribute) return element.hasAttribute(attribute);
terom@13:   return Element.Methods.Simulated.hasAttribute(element, attribute);
terom@13: };
terom@13: 
terom@13: Element.addMethods = function(methods) {
terom@13:   var F = Prototype.BrowserFeatures, T = Element.Methods.ByTag;
terom@13: 
terom@13:   if (!methods) {
terom@13:     Object.extend(Form, Form.Methods);
terom@13:     Object.extend(Form.Element, Form.Element.Methods);
terom@13:     Object.extend(Element.Methods.ByTag, {
terom@13:       "FORM":     Object.clone(Form.Methods),
terom@13:       "INPUT":    Object.clone(Form.Element.Methods),
terom@13:       "SELECT":   Object.clone(Form.Element.Methods),
terom@13:       "TEXTAREA": Object.clone(Form.Element.Methods)
terom@13:     });
terom@13:   }
terom@13: 
terom@13:   if (arguments.length == 2) {
terom@13:     var tagName = methods;
terom@13:     methods = arguments[1];
terom@13:   }
terom@13: 
terom@13:   if (!tagName) Object.extend(Element.Methods, methods || { });
terom@13:   else {
terom@13:     if (Object.isArray(tagName)) tagName.each(extend);
terom@13:     else extend(tagName);
terom@13:   }
terom@13: 
terom@13:   function extend(tagName) {
terom@13:     tagName = tagName.toUpperCase();
terom@13:     if (!Element.Methods.ByTag[tagName])
terom@13:       Element.Methods.ByTag[tagName] = { };
terom@13:     Object.extend(Element.Methods.ByTag[tagName], methods);
terom@13:   }
terom@13: 
terom@13:   function copy(methods, destination, onlyIfAbsent) {
terom@13:     onlyIfAbsent = onlyIfAbsent || false;
terom@13:     for (var property in methods) {
terom@13:       var value = methods[property];
terom@13:       if (!Object.isFunction(value)) continue;
terom@13:       if (!onlyIfAbsent || !(property in destination))
terom@13:         destination[property] = value.methodize();
terom@13:     }
terom@13:   }
terom@13: 
terom@13:   function findDOMClass(tagName) {
terom@13:     var klass;
terom@13:     var trans = {
terom@13:       "OPTGROUP": "OptGroup", "TEXTAREA": "TextArea", "P": "Paragraph",
terom@13:       "FIELDSET": "FieldSet", "UL": "UList", "OL": "OList", "DL": "DList",
terom@13:       "DIR": "Directory", "H1": "Heading", "H2": "Heading", "H3": "Heading",
terom@13:       "H4": "Heading", "H5": "Heading", "H6": "Heading", "Q": "Quote",
terom@13:       "INS": "Mod", "DEL": "Mod", "A": "Anchor", "IMG": "Image", "CAPTION":
terom@13:       "TableCaption", "COL": "TableCol", "COLGROUP": "TableCol", "THEAD":
terom@13:       "TableSection", "TFOOT": "TableSection", "TBODY": "TableSection", "TR":
terom@13:       "TableRow", "TH": "TableCell", "TD": "TableCell", "FRAMESET":
terom@13:       "FrameSet", "IFRAME": "IFrame"
terom@13:     };
terom@13:     if (trans[tagName]) klass = 'HTML' + trans[tagName] + 'Element';
terom@13:     if (window[klass]) return window[klass];
terom@13:     klass = 'HTML' + tagName + 'Element';
terom@13:     if (window[klass]) return window[klass];
terom@13:     klass = 'HTML' + tagName.capitalize() + 'Element';
terom@13:     if (window[klass]) return window[klass];
terom@13: 
terom@13:     window[klass] = { };
terom@13:     window[klass].prototype = document.createElement(tagName).__proto__;
terom@13:     return window[klass];
terom@13:   }
terom@13: 
terom@13:   if (F.ElementExtensions) {
terom@13:     copy(Element.Methods, HTMLElement.prototype);
terom@13:     copy(Element.Methods.Simulated, HTMLElement.prototype, true);
terom@13:   }
terom@13: 
terom@13:   if (F.SpecificElementExtensions) {
terom@13:     for (var tag in Element.Methods.ByTag) {
terom@13:       var klass = findDOMClass(tag);
terom@13:       if (Object.isUndefined(klass)) continue;
terom@13:       copy(T[tag], klass.prototype);
terom@13:     }
terom@13:   }
terom@13: 
terom@13:   Object.extend(Element, Element.Methods);
terom@13:   delete Element.ByTag;
terom@13: 
terom@13:   if (Element.extend.refresh) Element.extend.refresh();
terom@13:   Element.cache = { };
terom@13: };
terom@13: 
terom@13: document.viewport = {
terom@13:   getDimensions: function() {
terom@13:     var dimensions = { };
terom@13:     var B = Prototype.Browser;
terom@13:     $w('width height').each(function(d) {
terom@13:       var D = d.capitalize();
terom@13:       dimensions[d] = (B.WebKit && !document.evaluate) ? self['inner' + D] :
terom@13:         (B.Opera) ? document.body['client' + D] : document.documentElement['client' + D];
terom@13:     });
terom@13:     return dimensions;
terom@13:   },
terom@13: 
terom@13:   getWidth: function() {
terom@13:     return this.getDimensions().width;
terom@13:   },
terom@13: 
terom@13:   getHeight: function() {
terom@13:     return this.getDimensions().height;
terom@13:   },
terom@13: 
terom@13:   getScrollOffsets: function() {
terom@13:     return Element._returnOffset(
terom@13:       window.pageXOffset || document.documentElement.scrollLeft || document.body.scrollLeft,
terom@13:       window.pageYOffset || document.documentElement.scrollTop || document.body.scrollTop);
terom@13:   }
terom@13: };
terom@13: /* Portions of the Selector class are derived from Jack Slocum’s DomQuery,
terom@13:  * part of YUI-Ext version 0.40, distributed under the terms of an MIT-style
terom@13:  * license.  Please see http://www.yui-ext.com/ for more information. */
terom@13: 
terom@13: var Selector = Class.create({
terom@13:   initialize: function(expression) {
terom@13:     this.expression = expression.strip();
terom@13:     this.compileMatcher();
terom@13:   },
terom@13: 
terom@13:   shouldUseXPath: function() {
terom@13:     if (!Prototype.BrowserFeatures.XPath) return false;
terom@13: 
terom@13:     var e = this.expression;
terom@13: 
terom@13:     // Safari 3 chokes on :*-of-type and :empty
terom@13:     if (Prototype.Browser.WebKit &&
terom@13:      (e.include("-of-type") || e.include(":empty")))
terom@13:       return false;
terom@13: 
terom@13:     // XPath can't do namespaced attributes, nor can it read
terom@13:     // the "checked" property from DOM nodes
terom@13:     if ((/(\[[\w-]*?:|:checked)/).test(this.expression))
terom@13:       return false;
terom@13: 
terom@13:     return true;
terom@13:   },
terom@13: 
terom@13:   compileMatcher: function() {
terom@13:     if (this.shouldUseXPath())
terom@13:       return this.compileXPathMatcher();
terom@13: 
terom@13:     var e = this.expression, ps = Selector.patterns, h = Selector.handlers,
terom@13:         c = Selector.criteria, le, p, m;
terom@13: 
terom@13:     if (Selector._cache[e]) {
terom@13:       this.matcher = Selector._cache[e];
terom@13:       return;
terom@13:     }
terom@13: 
terom@13:     this.matcher = ["this.matcher = function(root) {",
terom@13:                     "var r = root, h = Selector.handlers, c = false, n;"];
terom@13: 
terom@13:     while (e && le != e && (/\S/).test(e)) {
terom@13:       le = e;
terom@13:       for (var i in ps) {
terom@13:         p = ps[i];
terom@13:         if (m = e.match(p)) {
terom@13:           this.matcher.push(Object.isFunction(c[i]) ? c[i](m) :
terom@13:     	      new Template(c[i]).evaluate(m));
terom@13:           e = e.replace(m[0], '');
terom@13:           break;
terom@13:         }
terom@13:       }
terom@13:     }
terom@13: 
terom@13:     this.matcher.push("return h.unique(n);\n}");
terom@13:     eval(this.matcher.join('\n'));
terom@13:     Selector._cache[this.expression] = this.matcher;
terom@13:   },
terom@13: 
terom@13:   compileXPathMatcher: function() {
terom@13:     var e = this.expression, ps = Selector.patterns,
terom@13:         x = Selector.xpath, le, m;
terom@13: 
terom@13:     if (Selector._cache[e]) {
terom@13:       this.xpath = Selector._cache[e]; return;
terom@13:     }
terom@13: 
terom@13:     this.matcher = ['.//*'];
terom@13:     while (e && le != e && (/\S/).test(e)) {
terom@13:       le = e;
terom@13:       for (var i in ps) {
terom@13:         if (m = e.match(ps[i])) {
terom@13:           this.matcher.push(Object.isFunction(x[i]) ? x[i](m) :
terom@13:             new Template(x[i]).evaluate(m));
terom@13:           e = e.replace(m[0], '');
terom@13:           break;
terom@13:         }
terom@13:       }
terom@13:     }
terom@13: 
terom@13:     this.xpath = this.matcher.join('');
terom@13:     Selector._cache[this.expression] = this.xpath;
terom@13:   },
terom@13: 
terom@13:   findElements: function(root) {
terom@13:     root = root || document;
terom@13:     if (this.xpath) return document._getElementsByXPath(this.xpath, root);
terom@13:     return this.matcher(root);
terom@13:   },
terom@13: 
terom@13:   match: function(element) {
terom@13:     this.tokens = [];
terom@13: 
terom@13:     var e = this.expression, ps = Selector.patterns, as = Selector.assertions;
terom@13:     var le, p, m;
terom@13: 
terom@13:     while (e && le !== e && (/\S/).test(e)) {
terom@13:       le = e;
terom@13:       for (var i in ps) {
terom@13:         p = ps[i];
terom@13:         if (m = e.match(p)) {
terom@13:           // use the Selector.assertions methods unless the selector
terom@13:           // is too complex.
terom@13:           if (as[i]) {
terom@13:             this.tokens.push([i, Object.clone(m)]);
terom@13:             e = e.replace(m[0], '');
terom@13:           } else {
terom@13:             // reluctantly do a document-wide search
terom@13:             // and look for a match in the array
terom@13:             return this.findElements(document).include(element);
terom@13:           }
terom@13:         }
terom@13:       }
terom@13:     }
terom@13: 
terom@13:     var match = true, name, matches;
terom@13:     for (var i = 0, token; token = this.tokens[i]; i++) {
terom@13:       name = token[0], matches = token[1];
terom@13:       if (!Selector.assertions[name](element, matches)) {
terom@13:         match = false; break;
terom@13:       }
terom@13:     }
terom@13: 
terom@13:     return match;
terom@13:   },
terom@13: 
terom@13:   toString: function() {
terom@13:     return this.expression;
terom@13:   },
terom@13: 
terom@13:   inspect: function() {
terom@13:     return "#<Selector:" + this.expression.inspect() + ">";
terom@13:   }
terom@13: });
terom@13: 
terom@13: Object.extend(Selector, {
terom@13:   _cache: { },
terom@13: 
terom@13:   xpath: {
terom@13:     descendant:   "//*",
terom@13:     child:        "/*",
terom@13:     adjacent:     "/following-sibling::*[1]",
terom@13:     laterSibling: '/following-sibling::*',
terom@13:     tagName:      function(m) {
terom@13:       if (m[1] == '*') return '';
terom@13:       return "[local-name()='" + m[1].toLowerCase() +
terom@13:              "' or local-name()='" + m[1].toUpperCase() + "']";
terom@13:     },
terom@13:     className:    "[contains(concat(' ', @class, ' '), ' #{1} ')]",
terom@13:     id:           "[@id='#{1}']",
terom@13:     attrPresence: function(m) {
terom@13:       m[1] = m[1].toLowerCase();
terom@13:       return new Template("[@#{1}]").evaluate(m);
terom@13:     },
terom@13:     attr: function(m) {
terom@13:       m[1] = m[1].toLowerCase();
terom@13:       m[3] = m[5] || m[6];
terom@13:       return new Template(Selector.xpath.operators[m[2]]).evaluate(m);
terom@13:     },
terom@13:     pseudo: function(m) {
terom@13:       var h = Selector.xpath.pseudos[m[1]];
terom@13:       if (!h) return '';
terom@13:       if (Object.isFunction(h)) return h(m);
terom@13:       return new Template(Selector.xpath.pseudos[m[1]]).evaluate(m);
terom@13:     },
terom@13:     operators: {
terom@13:       '=':  "[@#{1}='#{3}']",
terom@13:       '!=': "[@#{1}!='#{3}']",
terom@13:       '^=': "[starts-with(@#{1}, '#{3}')]",
terom@13:       '$=': "[substring(@#{1}, (string-length(@#{1}) - string-length('#{3}') + 1))='#{3}']",
terom@13:       '*=': "[contains(@#{1}, '#{3}')]",
terom@13:       '~=': "[contains(concat(' ', @#{1}, ' '), ' #{3} ')]",
terom@13:       '|=': "[contains(concat('-', @#{1}, '-'), '-#{3}-')]"
terom@13:     },
terom@13:     pseudos: {
terom@13:       'first-child': '[not(preceding-sibling::*)]',
terom@13:       'last-child':  '[not(following-sibling::*)]',
terom@13:       'only-child':  '[not(preceding-sibling::* or following-sibling::*)]',
terom@13:       'empty':       "[count(*) = 0 and (count(text()) = 0 or translate(text(), ' \t\r\n', '') = '')]",
terom@13:       'checked':     "[@checked]",
terom@13:       'disabled':    "[@disabled]",
terom@13:       'enabled':     "[not(@disabled)]",
terom@13:       'not': function(m) {
terom@13:         var e = m[6], p = Selector.patterns,
terom@13:             x = Selector.xpath, le, v;
terom@13: 
terom@13:         var exclusion = [];
terom@13:         while (e && le != e && (/\S/).test(e)) {
terom@13:           le = e;
terom@13:           for (var i in p) {
terom@13:             if (m = e.match(p[i])) {
terom@13:               v = Object.isFunction(x[i]) ? x[i](m) : new Template(x[i]).evaluate(m);
terom@13:               exclusion.push("(" + v.substring(1, v.length - 1) + ")");
terom@13:               e = e.replace(m[0], '');
terom@13:               break;
terom@13:             }
terom@13:           }
terom@13:         }
terom@13:         return "[not(" + exclusion.join(" and ") + ")]";
terom@13:       },
terom@13:       'nth-child':      function(m) {
terom@13:         return Selector.xpath.pseudos.nth("(count(./preceding-sibling::*) + 1) ", m);
terom@13:       },
terom@13:       'nth-last-child': function(m) {
terom@13:         return Selector.xpath.pseudos.nth("(count(./following-sibling::*) + 1) ", m);
terom@13:       },
terom@13:       'nth-of-type':    function(m) {
terom@13:         return Selector.xpath.pseudos.nth("position() ", m);
terom@13:       },
terom@13:       'nth-last-of-type': function(m) {
terom@13:         return Selector.xpath.pseudos.nth("(last() + 1 - position()) ", m);
terom@13:       },
terom@13:       'first-of-type':  function(m) {
terom@13:         m[6] = "1"; return Selector.xpath.pseudos['nth-of-type'](m);
terom@13:       },
terom@13:       'last-of-type':   function(m) {
terom@13:         m[6] = "1"; return Selector.xpath.pseudos['nth-last-of-type'](m);
terom@13:       },
terom@13:       'only-of-type':   function(m) {
terom@13:         var p = Selector.xpath.pseudos; return p['first-of-type'](m) + p['last-of-type'](m);
terom@13:       },
terom@13:       nth: function(fragment, m) {
terom@13:         var mm, formula = m[6], predicate;
terom@13:         if (formula == 'even') formula = '2n+0';
terom@13:         if (formula == 'odd')  formula = '2n+1';
terom@13:         if (mm = formula.match(/^(\d+)$/)) // digit only
terom@13:           return '[' + fragment + "= " + mm[1] + ']';
terom@13:         if (mm = formula.match(/^(-?\d*)?n(([+-])(\d+))?/)) { // an+b
terom@13:           if (mm[1] == "-") mm[1] = -1;
terom@13:           var a = mm[1] ? Number(mm[1]) : 1;
terom@13:           var b = mm[2] ? Number(mm[2]) : 0;
terom@13:           predicate = "[((#{fragment} - #{b}) mod #{a} = 0) and " +
terom@13:           "((#{fragment} - #{b}) div #{a} >= 0)]";
terom@13:           return new Template(predicate).evaluate({
terom@13:             fragment: fragment, a: a, b: b });
terom@13:         }
terom@13:       }
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   criteria: {
terom@13:     tagName:      'n = h.tagName(n, r, "#{1}", c);      c = false;',
terom@13:     className:    'n = h.className(n, r, "#{1}", c);    c = false;',
terom@13:     id:           'n = h.id(n, r, "#{1}", c);           c = false;',
terom@13:     attrPresence: 'n = h.attrPresence(n, r, "#{1}", c); c = false;',
terom@13:     attr: function(m) {
terom@13:       m[3] = (m[5] || m[6]);
terom@13:       return new Template('n = h.attr(n, r, "#{1}", "#{3}", "#{2}", c); c = false;').evaluate(m);
terom@13:     },
terom@13:     pseudo: function(m) {
terom@13:       if (m[6]) m[6] = m[6].replace(/"/g, '\\"');
terom@13:       return new Template('n = h.pseudo(n, "#{1}", "#{6}", r, c); c = false;').evaluate(m);
terom@13:     },
terom@13:     descendant:   'c = "descendant";',
terom@13:     child:        'c = "child";',
terom@13:     adjacent:     'c = "adjacent";',
terom@13:     laterSibling: 'c = "laterSibling";'
terom@13:   },
terom@13: 
terom@13:   patterns: {
terom@13:     // combinators must be listed first
terom@13:     // (and descendant needs to be last combinator)
terom@13:     laterSibling: /^\s*~\s*/,
terom@13:     child:        /^\s*>\s*/,
terom@13:     adjacent:     /^\s*\+\s*/,
terom@13:     descendant:   /^\s/,
terom@13: 
terom@13:     // selectors follow
terom@13:     tagName:      /^\s*(\*|[\w\-]+)(\b|$)?/,
terom@13:     id:           /^#([\w\-\*]+)(\b|$)/,
terom@13:     className:    /^\.([\w\-\*]+)(\b|$)/,
terom@13:     pseudo:
terom@13: /^:((first|last|nth|nth-last|only)(-child|-of-type)|empty|checked|(en|dis)abled|not)(\((.*?)\))?(\b|$|(?=\s|[:+~>]))/,
terom@13:     attrPresence: /^\[([\w]+)\]/,
terom@13:     attr:         /\[((?:[\w-]*:)?[\w-]+)\s*(?:([!^$*~|]?=)\s*((['"])([^\4]*?)\4|([^'"][^\]]*?)))?\]/
terom@13:   },
terom@13: 
terom@13:   // for Selector.match and Element#match
terom@13:   assertions: {
terom@13:     tagName: function(element, matches) {
terom@13:       return matches[1].toUpperCase() == element.tagName.toUpperCase();
terom@13:     },
terom@13: 
terom@13:     className: function(element, matches) {
terom@13:       return Element.hasClassName(element, matches[1]);
terom@13:     },
terom@13: 
terom@13:     id: function(element, matches) {
terom@13:       return element.id === matches[1];
terom@13:     },
terom@13: 
terom@13:     attrPresence: function(element, matches) {
terom@13:       return Element.hasAttribute(element, matches[1]);
terom@13:     },
terom@13: 
terom@13:     attr: function(element, matches) {
terom@13:       var nodeValue = Element.readAttribute(element, matches[1]);
terom@13:       return nodeValue && Selector.operators[matches[2]](nodeValue, matches[5] || matches[6]);
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   handlers: {
terom@13:     // UTILITY FUNCTIONS
terom@13:     // joins two collections
terom@13:     concat: function(a, b) {
terom@13:       for (var i = 0, node; node = b[i]; i++)
terom@13:         a.push(node);
terom@13:       return a;
terom@13:     },
terom@13: 
terom@13:     // marks an array of nodes for counting
terom@13:     mark: function(nodes) {
terom@13:       var _true = Prototype.emptyFunction;
terom@13:       for (var i = 0, node; node = nodes[i]; i++)
terom@13:         node._countedByPrototype = _true;
terom@13:       return nodes;
terom@13:     },
terom@13: 
terom@13:     unmark: function(nodes) {
terom@13:       for (var i = 0, node; node = nodes[i]; i++)
terom@13:         node._countedByPrototype = undefined;
terom@13:       return nodes;
terom@13:     },
terom@13: 
terom@13:     // mark each child node with its position (for nth calls)
terom@13:     // "ofType" flag indicates whether we're indexing for nth-of-type
terom@13:     // rather than nth-child
terom@13:     index: function(parentNode, reverse, ofType) {
terom@13:       parentNode._countedByPrototype = Prototype.emptyFunction;
terom@13:       if (reverse) {
terom@13:         for (var nodes = parentNode.childNodes, i = nodes.length - 1, j = 1; i >= 0; i--) {
terom@13:           var node = nodes[i];
terom@13:           if (node.nodeType == 1 && (!ofType || node._countedByPrototype)) node.nodeIndex = j++;
terom@13:         }
terom@13:       } else {
terom@13:         for (var i = 0, j = 1, nodes = parentNode.childNodes; node = nodes[i]; i++)
terom@13:           if (node.nodeType == 1 && (!ofType || node._countedByPrototype)) node.nodeIndex = j++;
terom@13:       }
terom@13:     },
terom@13: 
terom@13:     // filters out duplicates and extends all nodes
terom@13:     unique: function(nodes) {
terom@13:       if (nodes.length == 0) return nodes;
terom@13:       var results = [], n;
terom@13:       for (var i = 0, l = nodes.length; i < l; i++)
terom@13:         if (!(n = nodes[i])._countedByPrototype) {
terom@13:           n._countedByPrototype = Prototype.emptyFunction;
terom@13:           results.push(Element.extend(n));
terom@13:         }
terom@13:       return Selector.handlers.unmark(results);
terom@13:     },
terom@13: 
terom@13:     // COMBINATOR FUNCTIONS
terom@13:     descendant: function(nodes) {
terom@13:       var h = Selector.handlers;
terom@13:       for (var i = 0, results = [], node; node = nodes[i]; i++)
terom@13:         h.concat(results, node.getElementsByTagName('*'));
terom@13:       return results;
terom@13:     },
terom@13: 
terom@13:     child: function(nodes) {
terom@13:       var h = Selector.handlers;
terom@13:       for (var i = 0, results = [], node; node = nodes[i]; i++) {
terom@13:         for (var j = 0, child; child = node.childNodes[j]; j++)
terom@13:           if (child.nodeType == 1 && child.tagName != '!') results.push(child);
terom@13:       }
terom@13:       return results;
terom@13:     },
terom@13: 
terom@13:     adjacent: function(nodes) {
terom@13:       for (var i = 0, results = [], node; node = nodes[i]; i++) {
terom@13:         var next = this.nextElementSibling(node);
terom@13:         if (next) results.push(next);
terom@13:       }
terom@13:       return results;
terom@13:     },
terom@13: 
terom@13:     laterSibling: function(nodes) {
terom@13:       var h = Selector.handlers;
terom@13:       for (var i = 0, results = [], node; node = nodes[i]; i++)
terom@13:         h.concat(results, Element.nextSiblings(node));
terom@13:       return results;
terom@13:     },
terom@13: 
terom@13:     nextElementSibling: function(node) {
terom@13:       while (node = node.nextSibling)
terom@13: 	      if (node.nodeType == 1) return node;
terom@13:       return null;
terom@13:     },
terom@13: 
terom@13:     previousElementSibling: function(node) {
terom@13:       while (node = node.previousSibling)
terom@13:         if (node.nodeType == 1) return node;
terom@13:       return null;
terom@13:     },
terom@13: 
terom@13:     // TOKEN FUNCTIONS
terom@13:     tagName: function(nodes, root, tagName, combinator) {
terom@13:       var uTagName = tagName.toUpperCase();
terom@13:       var results = [], h = Selector.handlers;
terom@13:       if (nodes) {
terom@13:         if (combinator) {
terom@13:           // fastlane for ordinary descendant combinators
terom@13:           if (combinator == "descendant") {
terom@13:             for (var i = 0, node; node = nodes[i]; i++)
terom@13:               h.concat(results, node.getElementsByTagName(tagName));
terom@13:             return results;
terom@13:           } else nodes = this[combinator](nodes);
terom@13:           if (tagName == "*") return nodes;
terom@13:         }
terom@13:         for (var i = 0, node; node = nodes[i]; i++)
terom@13:           if (node.tagName.toUpperCase() === uTagName) results.push(node);
terom@13:         return results;
terom@13:       } else return root.getElementsByTagName(tagName);
terom@13:     },
terom@13: 
terom@13:     id: function(nodes, root, id, combinator) {
terom@13:       var targetNode = $(id), h = Selector.handlers;
terom@13:       if (!targetNode) return [];
terom@13:       if (!nodes && root == document) return [targetNode];
terom@13:       if (nodes) {
terom@13:         if (combinator) {
terom@13:           if (combinator == 'child') {
terom@13:             for (var i = 0, node; node = nodes[i]; i++)
terom@13:               if (targetNode.parentNode == node) return [targetNode];
terom@13:           } else if (combinator == 'descendant') {
terom@13:             for (var i = 0, node; node = nodes[i]; i++)
terom@13:               if (Element.descendantOf(targetNode, node)) return [targetNode];
terom@13:           } else if (combinator == 'adjacent') {
terom@13:             for (var i = 0, node; node = nodes[i]; i++)
terom@13:               if (Selector.handlers.previousElementSibling(targetNode) == node)
terom@13:                 return [targetNode];
terom@13:           } else nodes = h[combinator](nodes);
terom@13:         }
terom@13:         for (var i = 0, node; node = nodes[i]; i++)
terom@13:           if (node == targetNode) return [targetNode];
terom@13:         return [];
terom@13:       }
terom@13:       return (targetNode && Element.descendantOf(targetNode, root)) ? [targetNode] : [];
terom@13:     },
terom@13: 
terom@13:     className: function(nodes, root, className, combinator) {
terom@13:       if (nodes && combinator) nodes = this[combinator](nodes);
terom@13:       return Selector.handlers.byClassName(nodes, root, className);
terom@13:     },
terom@13: 
terom@13:     byClassName: function(nodes, root, className) {
terom@13:       if (!nodes) nodes = Selector.handlers.descendant([root]);
terom@13:       var needle = ' ' + className + ' ';
terom@13:       for (var i = 0, results = [], node, nodeClassName; node = nodes[i]; i++) {
terom@13:         nodeClassName = node.className;
terom@13:         if (nodeClassName.length == 0) continue;
terom@13:         if (nodeClassName == className || (' ' + nodeClassName + ' ').include(needle))
terom@13:           results.push(node);
terom@13:       }
terom@13:       return results;
terom@13:     },
terom@13: 
terom@13:     attrPresence: function(nodes, root, attr, combinator) {
terom@13:       if (!nodes) nodes = root.getElementsByTagName("*");
terom@13:       if (nodes && combinator) nodes = this[combinator](nodes);
terom@13:       var results = [];
terom@13:       for (var i = 0, node; node = nodes[i]; i++)
terom@13:         if (Element.hasAttribute(node, attr)) results.push(node);
terom@13:       return results;
terom@13:     },
terom@13: 
terom@13:     attr: function(nodes, root, attr, value, operator, combinator) {
terom@13:       if (!nodes) nodes = root.getElementsByTagName("*");
terom@13:       if (nodes && combinator) nodes = this[combinator](nodes);
terom@13:       var handler = Selector.operators[operator], results = [];
terom@13:       for (var i = 0, node; node = nodes[i]; i++) {
terom@13:         var nodeValue = Element.readAttribute(node, attr);
terom@13:         if (nodeValue === null) continue;
terom@13:         if (handler(nodeValue, value)) results.push(node);
terom@13:       }
terom@13:       return results;
terom@13:     },
terom@13: 
terom@13:     pseudo: function(nodes, name, value, root, combinator) {
terom@13:       if (nodes && combinator) nodes = this[combinator](nodes);
terom@13:       if (!nodes) nodes = root.getElementsByTagName("*");
terom@13:       return Selector.pseudos[name](nodes, value, root);
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   pseudos: {
terom@13:     'first-child': function(nodes, value, root) {
terom@13:       for (var i = 0, results = [], node; node = nodes[i]; i++) {
terom@13:         if (Selector.handlers.previousElementSibling(node)) continue;
terom@13:           results.push(node);
terom@13:       }
terom@13:       return results;
terom@13:     },
terom@13:     'last-child': function(nodes, value, root) {
terom@13:       for (var i = 0, results = [], node; node = nodes[i]; i++) {
terom@13:         if (Selector.handlers.nextElementSibling(node)) continue;
terom@13:           results.push(node);
terom@13:       }
terom@13:       return results;
terom@13:     },
terom@13:     'only-child': function(nodes, value, root) {
terom@13:       var h = Selector.handlers;
terom@13:       for (var i = 0, results = [], node; node = nodes[i]; i++)
terom@13:         if (!h.previousElementSibling(node) && !h.nextElementSibling(node))
terom@13:           results.push(node);
terom@13:       return results;
terom@13:     },
terom@13:     'nth-child':        function(nodes, formula, root) {
terom@13:       return Selector.pseudos.nth(nodes, formula, root);
terom@13:     },
terom@13:     'nth-last-child':   function(nodes, formula, root) {
terom@13:       return Selector.pseudos.nth(nodes, formula, root, true);
terom@13:     },
terom@13:     'nth-of-type':      function(nodes, formula, root) {
terom@13:       return Selector.pseudos.nth(nodes, formula, root, false, true);
terom@13:     },
terom@13:     'nth-last-of-type': function(nodes, formula, root) {
terom@13:       return Selector.pseudos.nth(nodes, formula, root, true, true);
terom@13:     },
terom@13:     'first-of-type':    function(nodes, formula, root) {
terom@13:       return Selector.pseudos.nth(nodes, "1", root, false, true);
terom@13:     },
terom@13:     'last-of-type':     function(nodes, formula, root) {
terom@13:       return Selector.pseudos.nth(nodes, "1", root, true, true);
terom@13:     },
terom@13:     'only-of-type':     function(nodes, formula, root) {
terom@13:       var p = Selector.pseudos;
terom@13:       return p['last-of-type'](p['first-of-type'](nodes, formula, root), formula, root);
terom@13:     },
terom@13: 
terom@13:     // handles the an+b logic
terom@13:     getIndices: function(a, b, total) {
terom@13:       if (a == 0) return b > 0 ? [b] : [];
terom@13:       return $R(1, total).inject([], function(memo, i) {
terom@13:         if (0 == (i - b) % a && (i - b) / a >= 0) memo.push(i);
terom@13:         return memo;
terom@13:       });
terom@13:     },
terom@13: 
terom@13:     // handles nth(-last)-child, nth(-last)-of-type, and (first|last)-of-type
terom@13:     nth: function(nodes, formula, root, reverse, ofType) {
terom@13:       if (nodes.length == 0) return [];
terom@13:       if (formula == 'even') formula = '2n+0';
terom@13:       if (formula == 'odd')  formula = '2n+1';
terom@13:       var h = Selector.handlers, results = [], indexed = [], m;
terom@13:       h.mark(nodes);
terom@13:       for (var i = 0, node; node = nodes[i]; i++) {
terom@13:         if (!node.parentNode._countedByPrototype) {
terom@13:           h.index(node.parentNode, reverse, ofType);
terom@13:           indexed.push(node.parentNode);
terom@13:         }
terom@13:       }
terom@13:       if (formula.match(/^\d+$/)) { // just a number
terom@13:         formula = Number(formula);
terom@13:         for (var i = 0, node; node = nodes[i]; i++)
terom@13:           if (node.nodeIndex == formula) results.push(node);
terom@13:       } else if (m = formula.match(/^(-?\d*)?n(([+-])(\d+))?/)) { // an+b
terom@13:         if (m[1] == "-") m[1] = -1;
terom@13:         var a = m[1] ? Number(m[1]) : 1;
terom@13:         var b = m[2] ? Number(m[2]) : 0;
terom@13:         var indices = Selector.pseudos.getIndices(a, b, nodes.length);
terom@13:         for (var i = 0, node, l = indices.length; node = nodes[i]; i++) {
terom@13:           for (var j = 0; j < l; j++)
terom@13:             if (node.nodeIndex == indices[j]) results.push(node);
terom@13:         }
terom@13:       }
terom@13:       h.unmark(nodes);
terom@13:       h.unmark(indexed);
terom@13:       return results;
terom@13:     },
terom@13: 
terom@13:     'empty': function(nodes, value, root) {
terom@13:       for (var i = 0, results = [], node; node = nodes[i]; i++) {
terom@13:         // IE treats comments as element nodes
terom@13:         if (node.tagName == '!' || (node.firstChild && !node.innerHTML.match(/^\s*$/))) continue;
terom@13:         results.push(node);
terom@13:       }
terom@13:       return results;
terom@13:     },
terom@13: 
terom@13:     'not': function(nodes, selector, root) {
terom@13:       var h = Selector.handlers, selectorType, m;
terom@13:       var exclusions = new Selector(selector).findElements(root);
terom@13:       h.mark(exclusions);
terom@13:       for (var i = 0, results = [], node; node = nodes[i]; i++)
terom@13:         if (!node._countedByPrototype) results.push(node);
terom@13:       h.unmark(exclusions);
terom@13:       return results;
terom@13:     },
terom@13: 
terom@13:     'enabled': function(nodes, value, root) {
terom@13:       for (var i = 0, results = [], node; node = nodes[i]; i++)
terom@13:         if (!node.disabled) results.push(node);
terom@13:       return results;
terom@13:     },
terom@13: 
terom@13:     'disabled': function(nodes, value, root) {
terom@13:       for (var i = 0, results = [], node; node = nodes[i]; i++)
terom@13:         if (node.disabled) results.push(node);
terom@13:       return results;
terom@13:     },
terom@13: 
terom@13:     'checked': function(nodes, value, root) {
terom@13:       for (var i = 0, results = [], node; node = nodes[i]; i++)
terom@13:         if (node.checked) results.push(node);
terom@13:       return results;
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   operators: {
terom@13:     '=':  function(nv, v) { return nv == v; },
terom@13:     '!=': function(nv, v) { return nv != v; },
terom@13:     '^=': function(nv, v) { return nv.startsWith(v); },
terom@13:     '$=': function(nv, v) { return nv.endsWith(v); },
terom@13:     '*=': function(nv, v) { return nv.include(v); },
terom@13:     '~=': function(nv, v) { return (' ' + nv + ' ').include(' ' + v + ' '); },
terom@13:     '|=': function(nv, v) { return ('-' + nv.toUpperCase() + '-').include('-' + v.toUpperCase() + '-'); }
terom@13:   },
terom@13: 
terom@13:   split: function(expression) {
terom@13:     var expressions = [];
terom@13:     expression.scan(/(([\w#:.~>+()\s-]+|\*|\[.*?\])+)\s*(,|$)/, function(m) {
terom@13:       expressions.push(m[1].strip());
terom@13:     });
terom@13:     return expressions;
terom@13:   },
terom@13: 
terom@13:   matchElements: function(elements, expression) {
terom@13:     var matches = $$(expression), h = Selector.handlers;
terom@13:     h.mark(matches);
terom@13:     for (var i = 0, results = [], element; element = elements[i]; i++)
terom@13:       if (element._countedByPrototype) results.push(element);
terom@13:     h.unmark(matches);
terom@13:     return results;
terom@13:   },
terom@13: 
terom@13:   findElement: function(elements, expression, index) {
terom@13:     if (Object.isNumber(expression)) {
terom@13:       index = expression; expression = false;
terom@13:     }
terom@13:     return Selector.matchElements(elements, expression || '*')[index || 0];
terom@13:   },
terom@13: 
terom@13:   findChildElements: function(element, expressions) {
terom@13:     expressions = Selector.split(expressions.join(','));
terom@13:     var results = [], h = Selector.handlers;
terom@13:     for (var i = 0, l = expressions.length, selector; i < l; i++) {
terom@13:       selector = new Selector(expressions[i].strip());
terom@13:       h.concat(results, selector.findElements(element));
terom@13:     }
terom@13:     return (l > 1) ? h.unique(results) : results;
terom@13:   }
terom@13: });
terom@13: 
terom@13: if (Prototype.Browser.IE) {
terom@13:   Object.extend(Selector.handlers, {
terom@13:     // IE returns comment nodes on getElementsByTagName("*").
terom@13:     // Filter them out.
terom@13:     concat: function(a, b) {
terom@13:       for (var i = 0, node; node = b[i]; i++)
terom@13:         if (node.tagName !== "!") a.push(node);
terom@13:       return a;
terom@13:     },
terom@13: 
terom@13:     // IE improperly serializes _countedByPrototype in (inner|outer)HTML.
terom@13:     unmark: function(nodes) {
terom@13:       for (var i = 0, node; node = nodes[i]; i++)
terom@13:         node.removeAttribute('_countedByPrototype');
terom@13:       return nodes;
terom@13:     }
terom@13:   });
terom@13: }
terom@13: 
terom@13: function $$() {
terom@13:   return Selector.findChildElements(document, $A(arguments));
terom@13: }
terom@13: var Form = {
terom@13:   reset: function(form) {
terom@13:     $(form).reset();
terom@13:     return form;
terom@13:   },
terom@13: 
terom@13:   serializeElements: function(elements, options) {
terom@13:     if (typeof options != 'object') options = { hash: !!options };
terom@13:     else if (Object.isUndefined(options.hash)) options.hash = true;
terom@13:     var key, value, submitted = false, submit = options.submit;
terom@13: 
terom@13:     var data = elements.inject({ }, function(result, element) {
terom@13:       if (!element.disabled && element.name) {
terom@13:         key = element.name; value = $(element).getValue();
terom@13:         if (value != null && (element.type != 'submit' || (!submitted &&
terom@13:             submit !== false && (!submit || key == submit) && (submitted = true)))) {
terom@13:           if (key in result) {
terom@13:             // a key is already present; construct an array of values
terom@13:             if (!Object.isArray(result[key])) result[key] = [result[key]];
terom@13:             result[key].push(value);
terom@13:           }
terom@13:           else result[key] = value;
terom@13:         }
terom@13:       }
terom@13:       return result;
terom@13:     });
terom@13: 
terom@13:     return options.hash ? data : Object.toQueryString(data);
terom@13:   }
terom@13: };
terom@13: 
terom@13: Form.Methods = {
terom@13:   serialize: function(form, options) {
terom@13:     return Form.serializeElements(Form.getElements(form), options);
terom@13:   },
terom@13: 
terom@13:   getElements: function(form) {
terom@13:     return $A($(form).getElementsByTagName('*')).inject([],
terom@13:       function(elements, child) {
terom@13:         if (Form.Element.Serializers[child.tagName.toLowerCase()])
terom@13:           elements.push(Element.extend(child));
terom@13:         return elements;
terom@13:       }
terom@13:     );
terom@13:   },
terom@13: 
terom@13:   getInputs: function(form, typeName, name) {
terom@13:     form = $(form);
terom@13:     var inputs = form.getElementsByTagName('input');
terom@13: 
terom@13:     if (!typeName && !name) return $A(inputs).map(Element.extend);
terom@13: 
terom@13:     for (var i = 0, matchingInputs = [], length = inputs.length; i < length; i++) {
terom@13:       var input = inputs[i];
terom@13:       if ((typeName && input.type != typeName) || (name && input.name != name))
terom@13:         continue;
terom@13:       matchingInputs.push(Element.extend(input));
terom@13:     }
terom@13: 
terom@13:     return matchingInputs;
terom@13:   },
terom@13: 
terom@13:   disable: function(form) {
terom@13:     form = $(form);
terom@13:     Form.getElements(form).invoke('disable');
terom@13:     return form;
terom@13:   },
terom@13: 
terom@13:   enable: function(form) {
terom@13:     form = $(form);
terom@13:     Form.getElements(form).invoke('enable');
terom@13:     return form;
terom@13:   },
terom@13: 
terom@13:   findFirstElement: function(form) {
terom@13:     var elements = $(form).getElements().findAll(function(element) {
terom@13:       return 'hidden' != element.type && !element.disabled;
terom@13:     });
terom@13:     var firstByIndex = elements.findAll(function(element) {
terom@13:       return element.hasAttribute('tabIndex') && element.tabIndex >= 0;
terom@13:     }).sortBy(function(element) { return element.tabIndex }).first();
terom@13: 
terom@13:     return firstByIndex ? firstByIndex : elements.find(function(element) {
terom@13:       return ['input', 'select', 'textarea'].include(element.tagName.toLowerCase());
terom@13:     });
terom@13:   },
terom@13: 
terom@13:   focusFirstElement: function(form) {
terom@13:     form = $(form);
terom@13:     form.findFirstElement().activate();
terom@13:     return form;
terom@13:   },
terom@13: 
terom@13:   request: function(form, options) {
terom@13:     form = $(form), options = Object.clone(options || { });
terom@13: 
terom@13:     var params = options.parameters, action = form.readAttribute('action') || '';
terom@13:     if (action.blank()) action = window.location.href;
terom@13:     options.parameters = form.serialize(true);
terom@13: 
terom@13:     if (params) {
terom@13:       if (Object.isString(params)) params = params.toQueryParams();
terom@13:       Object.extend(options.parameters, params);
terom@13:     }
terom@13: 
terom@13:     if (form.hasAttribute('method') && !options.method)
terom@13:       options.method = form.method;
terom@13: 
terom@13:     return new Ajax.Request(action, options);
terom@13:   }
terom@13: };
terom@13: 
terom@13: /*--------------------------------------------------------------------------*/
terom@13: 
terom@13: Form.Element = {
terom@13:   focus: function(element) {
terom@13:     $(element).focus();
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   select: function(element) {
terom@13:     $(element).select();
terom@13:     return element;
terom@13:   }
terom@13: };
terom@13: 
terom@13: Form.Element.Methods = {
terom@13:   serialize: function(element) {
terom@13:     element = $(element);
terom@13:     if (!element.disabled && element.name) {
terom@13:       var value = element.getValue();
terom@13:       if (value != undefined) {
terom@13:         var pair = { };
terom@13:         pair[element.name] = value;
terom@13:         return Object.toQueryString(pair);
terom@13:       }
terom@13:     }
terom@13:     return '';
terom@13:   },
terom@13: 
terom@13:   getValue: function(element) {
terom@13:     element = $(element);
terom@13:     var method = element.tagName.toLowerCase();
terom@13:     return Form.Element.Serializers[method](element);
terom@13:   },
terom@13: 
terom@13:   setValue: function(element, value) {
terom@13:     element = $(element);
terom@13:     var method = element.tagName.toLowerCase();
terom@13:     Form.Element.Serializers[method](element, value);
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   clear: function(element) {
terom@13:     $(element).value = '';
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   present: function(element) {
terom@13:     return $(element).value != '';
terom@13:   },
terom@13: 
terom@13:   activate: function(element) {
terom@13:     element = $(element);
terom@13:     try {
terom@13:       element.focus();
terom@13:       if (element.select && (element.tagName.toLowerCase() != 'input' ||
terom@13:           !['button', 'reset', 'submit'].include(element.type)))
terom@13:         element.select();
terom@13:     } catch (e) { }
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   disable: function(element) {
terom@13:     element = $(element);
terom@13:     element.blur();
terom@13:     element.disabled = true;
terom@13:     return element;
terom@13:   },
terom@13: 
terom@13:   enable: function(element) {
terom@13:     element = $(element);
terom@13:     element.disabled = false;
terom@13:     return element;
terom@13:   }
terom@13: };
terom@13: 
terom@13: /*--------------------------------------------------------------------------*/
terom@13: 
terom@13: var Field = Form.Element;
terom@13: var $F = Form.Element.Methods.getValue;
terom@13: 
terom@13: /*--------------------------------------------------------------------------*/
terom@13: 
terom@13: Form.Element.Serializers = {
terom@13:   input: function(element, value) {
terom@13:     switch (element.type.toLowerCase()) {
terom@13:       case 'checkbox':
terom@13:       case 'radio':
terom@13:         return Form.Element.Serializers.inputSelector(element, value);
terom@13:       default:
terom@13:         return Form.Element.Serializers.textarea(element, value);
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   inputSelector: function(element, value) {
terom@13:     if (Object.isUndefined(value)) return element.checked ? element.value : null;
terom@13:     else element.checked = !!value;
terom@13:   },
terom@13: 
terom@13:   textarea: function(element, value) {
terom@13:     if (Object.isUndefined(value)) return element.value;
terom@13:     else element.value = value;
terom@13:   },
terom@13: 
terom@13:   select: function(element, index) {
terom@13:     if (Object.isUndefined(index))
terom@13:       return this[element.type == 'select-one' ?
terom@13:         'selectOne' : 'selectMany'](element);
terom@13:     else {
terom@13:       var opt, value, single = !Object.isArray(index);
terom@13:       for (var i = 0, length = element.length; i < length; i++) {
terom@13:         opt = element.options[i];
terom@13:         value = this.optionValue(opt);
terom@13:         if (single) {
terom@13:           if (value == index) {
terom@13:             opt.selected = true;
terom@13:             return;
terom@13:           }
terom@13:         }
terom@13:         else opt.selected = index.include(value);
terom@13:       }
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   selectOne: function(element) {
terom@13:     var index = element.selectedIndex;
terom@13:     return index >= 0 ? this.optionValue(element.options[index]) : null;
terom@13:   },
terom@13: 
terom@13:   selectMany: function(element) {
terom@13:     var values, length = element.length;
terom@13:     if (!length) return null;
terom@13: 
terom@13:     for (var i = 0, values = []; i < length; i++) {
terom@13:       var opt = element.options[i];
terom@13:       if (opt.selected) values.push(this.optionValue(opt));
terom@13:     }
terom@13:     return values;
terom@13:   },
terom@13: 
terom@13:   optionValue: function(opt) {
terom@13:     // extend element because hasAttribute may not be native
terom@13:     return Element.extend(opt).hasAttribute('value') ? opt.value : opt.text;
terom@13:   }
terom@13: };
terom@13: 
terom@13: /*--------------------------------------------------------------------------*/
terom@13: 
terom@13: Abstract.TimedObserver = Class.create(PeriodicalExecuter, {
terom@13:   initialize: function($super, element, frequency, callback) {
terom@13:     $super(callback, frequency);
terom@13:     this.element   = $(element);
terom@13:     this.lastValue = this.getValue();
terom@13:   },
terom@13: 
terom@13:   execute: function() {
terom@13:     var value = this.getValue();
terom@13:     if (Object.isString(this.lastValue) && Object.isString(value) ?
terom@13:         this.lastValue != value : String(this.lastValue) != String(value)) {
terom@13:       this.callback(this.element, value);
terom@13:       this.lastValue = value;
terom@13:     }
terom@13:   }
terom@13: });
terom@13: 
terom@13: Form.Element.Observer = Class.create(Abstract.TimedObserver, {
terom@13:   getValue: function() {
terom@13:     return Form.Element.getValue(this.element);
terom@13:   }
terom@13: });
terom@13: 
terom@13: Form.Observer = Class.create(Abstract.TimedObserver, {
terom@13:   getValue: function() {
terom@13:     return Form.serialize(this.element);
terom@13:   }
terom@13: });
terom@13: 
terom@13: /*--------------------------------------------------------------------------*/
terom@13: 
terom@13: Abstract.EventObserver = Class.create({
terom@13:   initialize: function(element, callback) {
terom@13:     this.element  = $(element);
terom@13:     this.callback = callback;
terom@13: 
terom@13:     this.lastValue = this.getValue();
terom@13:     if (this.element.tagName.toLowerCase() == 'form')
terom@13:       this.registerFormCallbacks();
terom@13:     else
terom@13:       this.registerCallback(this.element);
terom@13:   },
terom@13: 
terom@13:   onElementEvent: function() {
terom@13:     var value = this.getValue();
terom@13:     if (this.lastValue != value) {
terom@13:       this.callback(this.element, value);
terom@13:       this.lastValue = value;
terom@13:     }
terom@13:   },
terom@13: 
terom@13:   registerFormCallbacks: function() {
terom@13:     Form.getElements(this.element).each(this.registerCallback, this);
terom@13:   },
terom@13: 
terom@13:   registerCallback: function(element) {
terom@13:     if (element.type) {
terom@13:       switch (element.type.toLowerCase()) {
terom@13:         case 'checkbox':
terom@13:         case 'radio':
terom@13:           Event.observe(element, 'click', this.onElementEvent.bind(this));
terom@13:           break;
terom@13:         default:
terom@13:           Event.observe(element, 'change', this.onElementEvent.bind(this));
terom@13:           break;
terom@13:       }
terom@13:     }
terom@13:   }
terom@13: });
terom@13: 
terom@13: Form.Element.EventObserver = Class.create(Abstract.EventObserver, {
terom@13:   getValue: function() {
terom@13:     return Form.Element.getValue(this.element);
terom@13:   }
terom@13: });
terom@13: 
terom@13: Form.EventObserver = Class.create(Abstract.EventObserver, {
terom@13:   getValue: function() {
terom@13:     return Form.serialize(this.element);
terom@13:   }
terom@13: });
terom@13: if (!window.Event) var Event = { };
terom@13: 
terom@13: Object.extend(Event, {
terom@13:   KEY_BACKSPACE: 8,
terom@13:   KEY_TAB:       9,
terom@13:   KEY_RETURN:   13,
terom@13:   KEY_ESC:      27,
terom@13:   KEY_LEFT:     37,
terom@13:   KEY_UP:       38,
terom@13:   KEY_RIGHT:    39,
terom@13:   KEY_DOWN:     40,
terom@13:   KEY_DELETE:   46,
terom@13:   KEY_HOME:     36,
terom@13:   KEY_END:      35,
terom@13:   KEY_PAGEUP:   33,
terom@13:   KEY_PAGEDOWN: 34,
terom@13:   KEY_INSERT:   45,
terom@13: 
terom@13:   cache: { },
terom@13: 
terom@13:   relatedTarget: function(event) {
terom@13:     var element;
terom@13:     switch(event.type) {
terom@13:       case 'mouseover': element = event.fromElement; break;
terom@13:       case 'mouseout':  element = event.toElement;   break;
terom@13:       default: return null;
terom@13:     }
terom@13:     return Element.extend(element);
terom@13:   }
terom@13: });
terom@13: 
terom@13: Event.Methods = (function() {
terom@13:   var isButton;
terom@13: 
terom@13:   if (Prototype.Browser.IE) {
terom@13:     var buttonMap = { 0: 1, 1: 4, 2: 2 };
terom@13:     isButton = function(event, code) {
terom@13:       return event.button == buttonMap[code];
terom@13:     };
terom@13: 
terom@13:   } else if (Prototype.Browser.WebKit) {
terom@13:     isButton = function(event, code) {
terom@13:       switch (code) {
terom@13:         case 0: return event.which == 1 && !event.metaKey;
terom@13:         case 1: return event.which == 1 && event.metaKey;
terom@13:         default: return false;
terom@13:       }
terom@13:     };
terom@13: 
terom@13:   } else {
terom@13:     isButton = function(event, code) {
terom@13:       return event.which ? (event.which === code + 1) : (event.button === code);
terom@13:     };
terom@13:   }
terom@13: 
terom@13:   return {
terom@13:     isLeftClick:   function(event) { return isButton(event, 0) },
terom@13:     isMiddleClick: function(event) { return isButton(event, 1) },
terom@13:     isRightClick:  function(event) { return isButton(event, 2) },
terom@13: 
terom@13:     element: function(event) {
terom@13:       var node = Event.extend(event).target;
terom@13:       return Element.extend(node.nodeType == Node.TEXT_NODE ? node.parentNode : node);
terom@13:     },
terom@13: 
terom@13:     findElement: function(event, expression) {
terom@13:       var element = Event.element(event);
terom@13:       if (!expression) return element;
terom@13:       var elements = [element].concat(element.ancestors());
terom@13:       return Selector.findElement(elements, expression, 0);
terom@13:     },
terom@13: 
terom@13:     pointer: function(event) {
terom@13:       return {
terom@13:         x: event.pageX || (event.clientX +
terom@13:           (document.documentElement.scrollLeft || document.body.scrollLeft)),
terom@13:         y: event.pageY || (event.clientY +
terom@13:           (document.documentElement.scrollTop || document.body.scrollTop))
terom@13:       };
terom@13:     },
terom@13: 
terom@13:     pointerX: function(event) { return Event.pointer(event).x },
terom@13:     pointerY: function(event) { return Event.pointer(event).y },
terom@13: 
terom@13:     stop: function(event) {
terom@13:       Event.extend(event);
terom@13:       event.preventDefault();
terom@13:       event.stopPropagation();
terom@13:       event.stopped = true;
terom@13:     }
terom@13:   };
terom@13: })();
terom@13: 
terom@13: Event.extend = (function() {
terom@13:   var methods = Object.keys(Event.Methods).inject({ }, function(m, name) {
terom@13:     m[name] = Event.Methods[name].methodize();
terom@13:     return m;
terom@13:   });
terom@13: 
terom@13:   if (Prototype.Browser.IE) {
terom@13:     Object.extend(methods, {
terom@13:       stopPropagation: function() { this.cancelBubble = true },
terom@13:       preventDefault:  function() { this.returnValue = false },
terom@13:       inspect: function() { return "[object Event]" }
terom@13:     });
terom@13: 
terom@13:     return function(event) {
terom@13:       if (!event) return false;
terom@13:       if (event._extendedByPrototype) return event;
terom@13: 
terom@13:       event._extendedByPrototype = Prototype.emptyFunction;
terom@13:       var pointer = Event.pointer(event);
terom@13:       Object.extend(event, {
terom@13:         target: event.srcElement,
terom@13:         relatedTarget: Event.relatedTarget(event),
terom@13:         pageX:  pointer.x,
terom@13:         pageY:  pointer.y
terom@13:       });
terom@13:       return Object.extend(event, methods);
terom@13:     };
terom@13: 
terom@13:   } else {
terom@13:     Event.prototype = Event.prototype || document.createEvent("HTMLEvents").__proto__;
terom@13:     Object.extend(Event.prototype, methods);
terom@13:     return Prototype.K;
terom@13:   }
terom@13: })();
terom@13: 
terom@13: Object.extend(Event, (function() {
terom@13:   var cache = Event.cache;
terom@13: 
terom@13:   function getEventID(element) {
terom@13:     if (element._prototypeEventID) return element._prototypeEventID[0];
terom@13:     arguments.callee.id = arguments.callee.id || 1;
terom@13:     return element._prototypeEventID = [++arguments.callee.id];
terom@13:   }
terom@13: 
terom@13:   function getDOMEventName(eventName) {
terom@13:     if (eventName && eventName.include(':')) return "dataavailable";
terom@13:     return eventName;
terom@13:   }
terom@13: 
terom@13:   function getCacheForID(id) {
terom@13:     return cache[id] = cache[id] || { };
terom@13:   }
terom@13: 
terom@13:   function getWrappersForEventName(id, eventName) {
terom@13:     var c = getCacheForID(id);
terom@13:     return c[eventName] = c[eventName] || [];
terom@13:   }
terom@13: 
terom@13:   function createWrapper(element, eventName, handler) {
terom@13:     var id = getEventID(element);
terom@13:     var c = getWrappersForEventName(id, eventName);
terom@13:     if (c.pluck("handler").include(handler)) return false;
terom@13: 
terom@13:     var wrapper = function(event) {
terom@13:       if (!Event || !Event.extend ||
terom@13:         (event.eventName && event.eventName != eventName))
terom@13:           return false;
terom@13: 
terom@13:       Event.extend(event);
terom@13:       handler.call(element, event);
terom@13:     };
terom@13: 
terom@13:     wrapper.handler = handler;
terom@13:     c.push(wrapper);
terom@13:     return wrapper;
terom@13:   }
terom@13: 
terom@13:   function findWrapper(id, eventName, handler) {
terom@13:     var c = getWrappersForEventName(id, eventName);
terom@13:     return c.find(function(wrapper) { return wrapper.handler == handler });
terom@13:   }
terom@13: 
terom@13:   function destroyWrapper(id, eventName, handler) {
terom@13:     var c = getCacheForID(id);
terom@13:     if (!c[eventName]) return false;
terom@13:     c[eventName] = c[eventName].without(findWrapper(id, eventName, handler));
terom@13:   }
terom@13: 
terom@13:   function destroyCache() {
terom@13:     for (var id in cache)
terom@13:       for (var eventName in cache[id])
terom@13:         cache[id][eventName] = null;
terom@13:   }
terom@13: 
terom@13:   if (window.attachEvent) {
terom@13:     window.attachEvent("onunload", destroyCache);
terom@13:   }
terom@13: 
terom@13:   return {
terom@13:     observe: function(element, eventName, handler) {
terom@13:       element = $(element);
terom@13:       var name = getDOMEventName(eventName);
terom@13: 
terom@13:       var wrapper = createWrapper(element, eventName, handler);
terom@13:       if (!wrapper) return element;
terom@13: 
terom@13:       if (element.addEventListener) {
terom@13:         element.addEventListener(name, wrapper, false);
terom@13:       } else {
terom@13:         element.attachEvent("on" + name, wrapper);
terom@13:       }
terom@13: 
terom@13:       return element;
terom@13:     },
terom@13: 
terom@13:     stopObserving: function(element, eventName, handler) {
terom@13:       element = $(element);
terom@13:       var id = getEventID(element), name = getDOMEventName(eventName);
terom@13: 
terom@13:       if (!handler && eventName) {
terom@13:         getWrappersForEventName(id, eventName).each(function(wrapper) {
terom@13:           element.stopObserving(eventName, wrapper.handler);
terom@13:         });
terom@13:         return element;
terom@13: 
terom@13:       } else if (!eventName) {
terom@13:         Object.keys(getCacheForID(id)).each(function(eventName) {
terom@13:           element.stopObserving(eventName);
terom@13:         });
terom@13:         return element;
terom@13:       }
terom@13: 
terom@13:       var wrapper = findWrapper(id, eventName, handler);
terom@13:       if (!wrapper) return element;
terom@13: 
terom@13:       if (element.removeEventListener) {
terom@13:         element.removeEventListener(name, wrapper, false);
terom@13:       } else {
terom@13:         element.detachEvent("on" + name, wrapper);
terom@13:       }
terom@13: 
terom@13:       destroyWrapper(id, eventName, handler);
terom@13: 
terom@13:       return element;
terom@13:     },
terom@13: 
terom@13:     fire: function(element, eventName, memo) {
terom@13:       element = $(element);
terom@13:       if (element == document && document.createEvent && !element.dispatchEvent)
terom@13:         element = document.documentElement;
terom@13: 
terom@13:       var event;
terom@13:       if (document.createEvent) {
terom@13:         event = document.createEvent("HTMLEvents");
terom@13:         event.initEvent("dataavailable", true, true);
terom@13:       } else {
terom@13:         event = document.createEventObject();
terom@13:         event.eventType = "ondataavailable";
terom@13:       }
terom@13: 
terom@13:       event.eventName = eventName;
terom@13:       event.memo = memo || { };
terom@13: 
terom@13:       if (document.createEvent) {
terom@13:         element.dispatchEvent(event);
terom@13:       } else {
terom@13:         element.fireEvent(event.eventType, event);
terom@13:       }
terom@13: 
terom@13:       return Event.extend(event);
terom@13:     }
terom@13:   };
terom@13: })());
terom@13: 
terom@13: Object.extend(Event, Event.Methods);
terom@13: 
terom@13: Element.addMethods({
terom@13:   fire:          Event.fire,
terom@13:   observe:       Event.observe,
terom@13:   stopObserving: Event.stopObserving
terom@13: });
terom@13: 
terom@13: Object.extend(document, {
terom@13:   fire:          Element.Methods.fire.methodize(),
terom@13:   observe:       Element.Methods.observe.methodize(),
terom@13:   stopObserving: Element.Methods.stopObserving.methodize(),
terom@13:   loaded:        false
terom@13: });
terom@13: 
terom@13: (function() {
terom@13:   /* Support for the DOMContentLoaded event is based on work by Dan Webb,
terom@13:      Matthias Miller, Dean Edwards and John Resig. */
terom@13: 
terom@13:   var timer;
terom@13: 
terom@13:   function fireContentLoadedEvent() {
terom@13:     if (document.loaded) return;
terom@13:     if (timer) window.clearInterval(timer);
terom@13:     document.fire("dom:loaded");
terom@13:     document.loaded = true;
terom@13:   }
terom@13: 
terom@13:   if (document.addEventListener) {
terom@13:     if (Prototype.Browser.WebKit) {
terom@13:       timer = window.setInterval(function() {
terom@13:         if (/loaded|complete/.test(document.readyState))
terom@13:           fireContentLoadedEvent();
terom@13:       }, 0);
terom@13: 
terom@13:       Event.observe(window, "load", fireContentLoadedEvent);
terom@13: 
terom@13:     } else {
terom@13:       document.addEventListener("DOMContentLoaded",
terom@13:         fireContentLoadedEvent, false);
terom@13:     }
terom@13: 
terom@13:   } else {
terom@13:     document.write("<script id=__onDOMContentLoaded defer src=//:><\/script>");
terom@13:     $("__onDOMContentLoaded").onreadystatechange = function() {
terom@13:       if (this.readyState == "complete") {
terom@13:         this.onreadystatechange = null;
terom@13:         fireContentLoadedEvent();
terom@13:       }
terom@13:     };
terom@13:   }
terom@13: })();
terom@13: /*------------------------------- DEPRECATED -------------------------------*/
terom@13: 
terom@13: Hash.toQueryString = Object.toQueryString;
terom@13: 
terom@13: var Toggle = { display: Element.toggle };
terom@13: 
terom@13: Element.Methods.childOf = Element.Methods.descendantOf;
terom@13: 
terom@13: var Insertion = {
terom@13:   Before: function(element, content) {
terom@13:     return Element.insert(element, {before:content});
terom@13:   },
terom@13: 
terom@13:   Top: function(element, content) {
terom@13:     return Element.insert(element, {top:content});
terom@13:   },
terom@13: 
terom@13:   Bottom: function(element, content) {
terom@13:     return Element.insert(element, {bottom:content});
terom@13:   },
terom@13: 
terom@13:   After: function(element, content) {
terom@13:     return Element.insert(element, {after:content});
terom@13:   }
terom@13: };
terom@13: 
terom@13: var $continue = new Error('"throw $continue" is deprecated, use "return" instead');
terom@13: 
terom@13: // This should be moved to script.aculo.us; notice the deprecated methods
terom@13: // further below, that map to the newer Element methods.
terom@13: var Position = {
terom@13:   // set to true if needed, warning: firefox performance problems
terom@13:   // NOT neeeded for page scrolling, only if draggable contained in
terom@13:   // scrollable elements
terom@13:   includeScrollOffsets: false,
terom@13: 
terom@13:   // must be called before calling withinIncludingScrolloffset, every time the
terom@13:   // page is scrolled
terom@13:   prepare: function() {
terom@13:     this.deltaX =  window.pageXOffset
terom@13:                 || document.documentElement.scrollLeft
terom@13:                 || document.body.scrollLeft
terom@13:                 || 0;
terom@13:     this.deltaY =  window.pageYOffset
terom@13:                 || document.documentElement.scrollTop
terom@13:                 || document.body.scrollTop
terom@13:                 || 0;
terom@13:   },
terom@13: 
terom@13:   // caches x/y coordinate pair to use with overlap
terom@13:   within: function(element, x, y) {
terom@13:     if (this.includeScrollOffsets)
terom@13:       return this.withinIncludingScrolloffsets(element, x, y);
terom@13:     this.xcomp = x;
terom@13:     this.ycomp = y;
terom@13:     this.offset = Element.cumulativeOffset(element);
terom@13: 
terom@13:     return (y >= this.offset[1] &&
terom@13:             y <  this.offset[1] + element.offsetHeight &&
terom@13:             x >= this.offset[0] &&
terom@13:             x <  this.offset[0] + element.offsetWidth);
terom@13:   },
terom@13: 
terom@13:   withinIncludingScrolloffsets: function(element, x, y) {
terom@13:     var offsetcache = Element.cumulativeScrollOffset(element);
terom@13: 
terom@13:     this.xcomp = x + offsetcache[0] - this.deltaX;
terom@13:     this.ycomp = y + offsetcache[1] - this.deltaY;
terom@13:     this.offset = Element.cumulativeOffset(element);
terom@13: 
terom@13:     return (this.ycomp >= this.offset[1] &&
terom@13:             this.ycomp <  this.offset[1] + element.offsetHeight &&
terom@13:             this.xcomp >= this.offset[0] &&
terom@13:             this.xcomp <  this.offset[0] + element.offsetWidth);
terom@13:   },
terom@13: 
terom@13:   // within must be called directly before
terom@13:   overlap: function(mode, element) {
terom@13:     if (!mode) return 0;
terom@13:     if (mode == 'vertical')
terom@13:       return ((this.offset[1] + element.offsetHeight) - this.ycomp) /
terom@13:         element.offsetHeight;
terom@13:     if (mode == 'horizontal')
terom@13:       return ((this.offset[0] + element.offsetWidth) - this.xcomp) /
terom@13:         element.offsetWidth;
terom@13:   },
terom@13: 
terom@13:   // Deprecation layer -- use newer Element methods now (1.5.2).
terom@13: 
terom@13:   cumulativeOffset: Element.Methods.cumulativeOffset,
terom@13: 
terom@13:   positionedOffset: Element.Methods.positionedOffset,
terom@13: 
terom@13:   absolutize: function(element) {
terom@13:     Position.prepare();
terom@13:     return Element.absolutize(element);
terom@13:   },
terom@13: 
terom@13:   relativize: function(element) {
terom@13:     Position.prepare();
terom@13:     return Element.relativize(element);
terom@13:   },
terom@13: 
terom@13:   realOffset: Element.Methods.cumulativeScrollOffset,
terom@13: 
terom@13:   offsetParent: Element.Methods.getOffsetParent,
terom@13: 
terom@13:   page: Element.Methods.viewportOffset,
terom@13: 
terom@13:   clone: function(source, target, options) {
terom@13:     options = options || { };
terom@13:     return Element.clonePosition(target, source, options);
terom@13:   }
terom@13: };
terom@13: 
terom@13: /*--------------------------------------------------------------------------*/
terom@13: 
terom@13: if (!document.getElementsByClassName) document.getElementsByClassName = function(instanceMethods){
terom@13:   function iter(name) {
terom@13:     return name.blank() ? null : "[contains(concat(' ', @class, ' '), ' " + name + " ')]";
terom@13:   }
terom@13: 
terom@13:   instanceMethods.getElementsByClassName = Prototype.BrowserFeatures.XPath ?
terom@13:   function(element, className) {
terom@13:     className = className.toString().strip();
terom@13:     var cond = /\s/.test(className) ? $w(className).map(iter).join('') : iter(className);
terom@13:     return cond ? document._getElementsByXPath('.//*' + cond, element) : [];
terom@13:   } : function(element, className) {
terom@13:     className = className.toString().strip();
terom@13:     var elements = [], classNames = (/\s/.test(className) ? $w(className) : null);
terom@13:     if (!classNames && !className) return elements;
terom@13: 
terom@13:     var nodes = $(element).getElementsByTagName('*');
terom@13:     className = ' ' + className + ' ';
terom@13: 
terom@13:     for (var i = 0, child, cn; child = nodes[i]; i++) {
terom@13:       if (child.className && (cn = ' ' + child.className + ' ') && (cn.include(className) ||
terom@13:           (classNames && classNames.all(function(name) {
terom@13:             return !name.toString().blank() && cn.include(' ' + name + ' ');
terom@13:           }))))
terom@13:         elements.push(Element.extend(child));
terom@13:     }
terom@13:     return elements;
terom@13:   };
terom@13: 
terom@13:   return function(className, parentElement) {
terom@13:     return $(parentElement || document.body).getElementsByClassName(className);
terom@13:   };
terom@13: }(Element.Methods);
terom@13: 
terom@13: /*--------------------------------------------------------------------------*/
terom@13: 
terom@13: Element.ClassNames = Class.create();
terom@13: Element.ClassNames.prototype = {
terom@13:   initialize: function(element) {
terom@13:     this.element = $(element);
terom@13:   },
terom@13: 
terom@13:   _each: function(iterator) {
terom@13:     this.element.className.split(/\s+/).select(function(name) {
terom@13:       return name.length > 0;
terom@13:     })._each(iterator);
terom@13:   },
terom@13: 
terom@13:   set: function(className) {
terom@13:     this.element.className = className;
terom@13:   },
terom@13: 
terom@13:   add: function(classNameToAdd) {
terom@13:     if (this.include(classNameToAdd)) return;
terom@13:     this.set($A(this).concat(classNameToAdd).join(' '));
terom@13:   },
terom@13: 
terom@13:   remove: function(classNameToRemove) {
terom@13:     if (!this.include(classNameToRemove)) return;
terom@13:     this.set($A(this).without(classNameToRemove).join(' '));
terom@13:   },
terom@13: 
terom@13:   toString: function() {
terom@13:     return $A(this).join(' ');
terom@13:   }
terom@13: };
terom@13: 
terom@13: Object.extend(Element.ClassNames.prototype, Enumerable);
terom@13: 
terom@13: /*--------------------------------------------------------------------------*/
terom@13: 
terom@13: Element.addMethods();