This seems to no longer be used anywhere...?

[dbsrgits/SQL-Translator.git] / lib / SQL / Translator / Generator / Utils.pm

diff --git a/lib/SQL/Translator/Generator/Utils.pm b/lib/SQL/Translator/Generator/Utils.pm
deleted file mode 100644 (file)
index 6b2b79f..0000000
--- a/lib/SQL/Translator/Generator/Utils.pm
+++ /dev/null
@@ -1,34 +0,0 @@
-package # hide from pause
-  SQL::Translator::Generator::Utils;
-
-# AUTHOR: Arthur Axel fREW Schmidt
-# Copyright: Same as Perl 5
-
-use Moo;
-use Sub::Quote 'quote_sub';
-
-# this should be ro, but I have to modify it in BUILD so bleh
-has quote_chars => ( is => 'rw' );
-
-has name_sep    => (
-   is => 'ro',
-   default => quote_sub q{ '.' },
-);
-
-with 'SQL::Translator::Generator::Role::Quote';
-
-sub BUILD {
-   my $self = shift;
-
-   unless (ref($self->quote_chars)) {
-      if ($self->quote_chars) {
-         $self->quote_chars([$self->quote_chars])
-      } else {
-         $self->quote_chars([])
-      }
-   }
-
-   $self
-}
-
-1;