Item175:

   * more bridge objs
   * work around for infinit loop in Tie::Scalar
   * uped $TWiki::Plugins::VERSION to TWiki-4.2.3



git-svn-id: http://svn.foswiki.org/trunk@834 0b4bb1d4-4e5a-0410-9cc4-b2b747904278

TWikiCompatibilityPlugin/lib/TWiki/Attrs.pm

@@ -0,0 +1,16 @@
+package TWiki::Attrs;
+
+# Bridge between TWiki::Attra and Foswiki::Attrs
+
+use strict;
+
+use Foswiki::Attrs;
+
+sub new { Foswiki::Attrs::new(@_) }
+sub isEmpty { Foswiki::Attrs::isEmpty(@_) }
+sub remove { Foswiki::Attrs::remove(@_) }
+sub stringify { Foswiki::Attrs::stringify(@_) }
+sub extractValue { Foswiki::Attrs::extractValue(@_) }
+sub get { Foswiki::Attrs::get(@_) }
+
+1;

TWikiCompatibilityPlugin/lib/TWiki/Plugins.pm

@@ -3,7 +3,7 @@ package TWiki::Plugins;
 use Foswiki::Plugins;
 
 # Compatible version of TWiki::Plugins
-our $VERSION = 1.026;
+our $VERSION = '1.2';
 
 # Access to $TWiki::Plugins::SESSION is via a tie to $Foswiki::Plugins::SESSION
 {
@@ -14,6 +14,6 @@ our $VERSION = 1.026;
     sub FETCH { return $Foswiki::Plugins::SESSION; }
 };
 
-tie($TWiki::Plugins::SESSION, 'TWiki::Plugins::SESSION_TIE');
+#tie($SESSION, 'TWiki::Plugins::SESSION_TIE');
 
 1;

TWikiCompatibilityPlugin/lib/TWiki/Plugins/TWikiCompatibilityPlugin/MANIFEST

@@ -5,3 +5,6 @@ lib/TWiki/Plugins/TWikiCompatibilityPlugin.pm 0644 Perl module
 lib/TWiki/Plugins/TWikiCompatibilityPlugin/Config.spec configuration defaults
 lib/TWiki/Plugins.pm 0644 Perl module
 lib/TWiki/Func.pm 0644 Perl module
+lib/TWiki/Attrs.pm 0644 Perl module
+lib/TWiki/Sandbox.pm 0644 Perl module
+lib/TWiki/Prefs.pm 0644 Perl module

TWikiCompatibilityPlugin/lib/TWiki/Prefs.pm

@@ -0,0 +1,27 @@
+package TWiki::Prefs;
+
+# Bridge between TWiki::Prefs and Foswiki::Prefs
+
+use strict;
+
+use Foswiki::Prefs;
+
+
+sub new { Foswiki::Prefs::new(@_) }
+sub finish { Foswiki::Prefs::finish(@_) }
+sub pushPreferences { Foswiki::Prefs::pushPreferences(@_) }
+sub pushWebPreferences { Foswiki::Prefs::pushWebPreferences(@_) }
+sub pushGlobalPreferences { Foswiki::Prefs::pushGlobalPreferences(@_) }
+sub pushGlobalPreferencesSiteSpecific { Foswiki::Prefs::pushGlobalPreferencesSiteSpecific(@_) }
+sub pushPreferenceValues { Foswiki::Prefs::pushPreferenceValues(@_) }
+sub mark { Foswiki::Prefs::mark(@_) }
+sub restore { Foswiki::Prefs::restore(@_) }
+sub getPreferencesValue { Foswiki::Prefs::getPreferencesValue(@_) }
+sub isFinalised { Foswiki::Prefs::isFinalised(@_) }
+sub getTopicPreferencesValue { Foswiki::Prefs::getTopicPreferencesValue(@_) }
+sub getTextPreferencesValue { Foswiki::Prefs::getTextPreferencesValue(@_) }
+sub getWebPreferencesValue { Foswiki::Prefs::getWebPreferencesValue(@_) }
+sub setPreferencesValue { Foswiki::Prefs::setPreferencesValue(@_) }
+sub stringify { Foswiki::Prefs::stringify(@_) }
+
+1;

TWikiCompatibilityPlugin/lib/TWiki/Sandbox.pm

@@ -0,0 +1,17 @@
+package TWiki::Sandbox;
+
+# Bridge between TWiki::Sandbox and Foswiki::Sandbox
+
+use strict;
+
+use Foswiki::Sandbox;
+
+sub TRACE { 0 }
+sub new { Foswiki::Sandbox::new(@_) }
+sub finish { Foswiki::Sandbox::finish(@_) }
+sub untaintUnchecked { Foswiki::Sandbox::untaintUnchecked(@_) }
+sub normalizeFileName { Foswiki::Sandbox::normalizeFileName(@_) }
+sub sanitizeAttachmentName { Foswiki::Sandbox::sanitizeAttachmentName(@_) }
+sub sysCommand { Foswiki::Sandbox::sysCommand(@_) }
+
+1;