module ActionController #:stopdoc:
  module MimeResponds
    module InstanceMethods
      def respond_to(*types, &block)
        # Suppresses HTML respond_to's in Production Environment 
        request_format = self.request.parameters[:format] || 'html'
        raise "HTML is not supported in this environment" if (RAILS_ENV == "production" && request_format == 'html')
        # End Suppress
        raise ArgumentError, "respond_to takes either types or a block, never both" unless types.any? ^ block
        block ||= lambda { |responder| types.each { |type| responder.send(type) } }
        responder = Responder.new(self)
        block.call(responder)
        responder.respond
      end
    end
  end
end

# Copied from Flexible Rails (http://www.flexiblerails.com)

module ActiveSupport #:nodoc: 
  module CoreExtensions #:nodoc: 
    module Hash #:nodoc: 
      module Conversions 
        # We force :dasherize to be false, since we never want 
        # it true.  Thanks very much to the reader on the 
        # flexiblerails Google Group who suggested this better 
        # approach. 
        unless method_defined? :old_to_xml 
          alias_method :old_to_xml, :to_xml 
          def to_xml(options = {}) 
            options.merge!(:dasherize => false) 
            old_to_xml(options) 
          end 
        end 
      end 
    end

    module Array #:nodoc: 
      module Conversions 
        # We force :dasherize to be false, since we never want 
        # it to be true. 
        unless method_defined? :old_to_xml 
          alias_method :old_to_xml, :to_xml 
          def to_xml(options = {}) 
            options.merge!(:dasherize => false) 
            old_to_xml(options) 
          end 
        end 
      end 
    end 
  end 
end

module ActiveRecord #:nodoc: 
  module Serialization 
    # We force :dasherize to be false, since we never want it to 
    # be true. 
    unless method_defined? :old_to_xml 
      alias_method :old_to_xml, :to_xml 
      def to_xml(options = {}) 
        options.merge!(:dasherize => false) 
        old_to_xml(options) 
      end 
    end 
  end 
end