class Gem::Tasks::SCM::Status

def dirty?
  status = case @project.scm
           when :git then `git status --porcelain --untracked-files=no`
           when :hg  then `hg status --quiet`
           when :svn then `svn status --quiet`
           else            ''
           end
  return !status.chomp.empty?
end