Filip Tepper

 require 'string'
 
module Multiup
  module Acts
    module Slugable
      module InstanceMethods
        private
          def create_slug
            return if self.errors.length > 0
 
            if self[source_column].nil? or self[source_column].empty?
              return
            end
 
            if self[slug_column].to_s.empty?
              test_string = self[source_column]
 
              proposed_slug = test_string.strip.downcase.gsub(/[\'\"\#\$\,\.\!\?\%\@\(\)]+/, '').to_ascii
              proposed_slug = proposed_slug.gsub(/&/, 'and')
              proposed_slug = proposed_slug.gsub(/[\W^-_]+/, '-')
              proposed_slug = proposed_slug.gsub(/\-{2}/, '-')
 
              suffix = ""
              existing = true
              acts_as_slugable_class.transaction do
                while existing != nil
                  existing = acts_as_slugable_class.find(:first, :conditions => ["#{slug_column} = ? and #{slug_scope_condition}",  proposed_slug + suffix])
                  if existing
                    if suffix.empty?
                      suffix = "-0"
                    else
                      suffix.succ!
                    end
                  end
                end
              end         
              self[slug_column] = proposed_slug + suffix
            end
        end
      end
    end
  end
end
 
ActiveRecord::Base.class_eval do
  include Multiup::Acts::Slugable
end