openinteract-commits — CVS updates for OpenInteract/SPOPS

[Openinteract-commits] CVS: OpenInteract2/sample/package_from_table App.pm,1.1,1.2

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/sample/package_from_table
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29942/sample/package_from_table

Modified Files:
	App.pm 
Log Message:
OIN-72: be able to install an OI2 package from a CPAN dist

Index: App.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/sample/package_from_table/App.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** App.pm	26 Feb 2005 23:07:03 -0000	1.1
--- App.pm	9 Mar 2005 20:26:25 -0000	1.2
***************
*** 5,13 ****
  use OpenInteract2::Manage;
  
! $OpenInteract2::App::[% class_name %]::VERSION = '0.01';
  @OpenInteract2::App::[% class_name %]::EXPORT  = qw( install );
  
  sub get_brick_name {
!     return '[% package_name %]';
  }
  
--- 5,24 ----
  use OpenInteract2::Manage;
  
! $OpenInteract2::App::[% class_name %]::VERSION = sprintf("%d.%02d", q$Revision$ =~ /(\d+)\.(\d+)/);
  @OpenInteract2::App::[% class_name %]::EXPORT  = qw( install );
  
+ my $NAME = '[% package_name %]';
+ 
+ sub new {
+     return OpenInteract2::App->new( $NAME );
+ }
+ 
+ sub get_brick {
+     require OpenInteract2::Brick;
+     return OpenInteract2::Brick->new( $NAME );
+ }
+ 
  sub get_brick_name {
!     return $NAME;
  }
  
***************
*** 21,24 ****
--- 32,39 ----
  }
  
+ OpenInteract2::App->register_factory_type( $NAME => __PACKAGE__ );
+ 
+ 1;
+ 
  __END__
  
***************
*** 29,57 ****
  OpenInteract2::App::[% class_name %] - This application will do everything!
  
! =head1 SYNOPSIS
! 
! =head1 DESCRIPTION
! 
! =head1 OBJECTS
! 
! No objects created by this application.
! 
! =head1 ACTIONS
! 
! No actions defined in this application.
! 
! =head1 RULESETS
! 
! No rulesets defined in this application.
! 
! =head1 TASKS
! 
! No management tasks defined in this application.
! 
! =head1 SEE ALSO
! 
! =head1 AUTHORS
! 
! Who AmI E<lt>me...@wh...E<gt>
  
  =cut
--- 44,48 ----
  OpenInteract2::App::[% class_name %] - This application will do everything!
  
! [% pod %]
  
  =cut

[Openinteract-commits] CVS: OpenInteract2/lib/OpenInteract2/Manage/Package CreateCPAN.pm,1.2,1.3

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Manage/Package
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29942/lib/OpenInteract2/Manage/Package

Modified Files:
	CreateCPAN.pm 
Log Message:
OIN-72: be able to install an OI2 package from a CPAN dist

Index: CreateCPAN.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Manage/Package/CreateCPAN.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** CreateCPAN.pm	1 Mar 2005 03:33:29 -0000	1.2
--- CreateCPAN.pm	9 Mar 2005 20:26:23 -0000	1.3
***************
*** 76,79 ****
--- 76,80 ----
      my $subclass_name    = $package->name_as_class;
      my $brick_class_name = "OpenInteract2::Brick::$subclass_name";
+     my $app_class_name   = "OpenInteract2::App::$subclass_name";
  
      my $config  = $package->config;
***************
*** 104,107 ****
--- 105,109 ----
          package_name     => $package->name,
          brick_name       => $package->name,
+         full_app_class   => $app_class_name,
          full_brick_class => $brick_class_name,
          subclass         => $subclass_name,

[Openinteract-commits] CVS: OpenInteract2/lib/OpenInteract2/Manage/Website InstallPackage.pm,1.16,1.17

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Manage/Website
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29942/lib/OpenInteract2/Manage/Website

Modified Files:
	InstallPackage.pm 
Log Message:
OIN-72: be able to install an OI2 package from a CPAN dist

Index: InstallPackage.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Manage/Website/InstallPackage.pm,v
retrieving revision 1.16
retrieving revision 1.17
diff -C2 -d -r1.16 -r1.17
*** InstallPackage.pm	28 Feb 2005 02:03:10 -0000	1.16
--- InstallPackage.pm	9 Mar 2005 20:26:24 -0000	1.17
***************
*** 5,10 ****
  use strict;
  use base qw( OpenInteract2::Manage::Website );
! use File::Spec::Functions  qw( catfile );
! use OpenInteract2::Context qw( CTX );
  use OpenInteract2::Repository;
  
--- 5,11 ----
  use strict;
  use base qw( OpenInteract2::Manage::Website );
! use File::Spec::Functions    qw( catdir catfile );
! use OpenInteract2::Context   qw( CTX );
! use OpenInteract2::Exception qw( oi_error );
  use OpenInteract2::Repository;
  
***************
*** 28,36 ****
              description =>
                  'Package distribution filename to install to website',
!             is_required => 'yes',
          },
      };
  }
  
  sub setup_task {
      my ( $self ) = @_;
--- 29,59 ----
              description =>
                  'Package distribution filename to install to website',
!             is_required => 'no',
!             do_validate => 'yes',
!         },
!         package_class => {
!             description =>
!                 'Package distribution application class that can perform installation',
!             is_required => 'no',
!             do_validate => 'yes',
          },
      };
  }
  
+ sub validate_param {
+     my ( $self, $name, $value ) = @_;
+     if ( $name eq 'package_class' ) {
+         my $pkg_file = $self->param( 'package_file' );
+         unless ( $value or $pkg_file ) {
+             return "Either 'package_class' or 'package_file' must be defined.";
+         }
+         return;
+     }
+     elsif ( $name eq 'package_file' ) {
+         return unless ( $value );
+     }
+     return $self->SUPER::validate_param( $name, $value );
+ }
+ 
  sub setup_task {
      my ( $self ) = @_;
***************
*** 43,102 ****
  sub run_task {
      my ( $self ) = @_;
-     my $package_file = $self->param( 'package_file' );
      my %status = (
          action   => 'install package',
-         filename => $package_file,
      );
      my $package = OpenInteract2::Package->new({
          package_file => $package_file
      });
      my $full_package_name = $package->full_name;
!     my $repository = CTX->repository;
!     my $rep_package = $repository->fetch_package( $package->name );
!     if ( $rep_package && $rep_package->version == $package->version ) {
!             $status{is_ok} = 'yes';
!             $status{package} = $package->name;
!             $status{version} = $package->version;
!             $status{message} =
!                 sprintf( 'Package %s-%s not upgraded, ' .
!                          'this version already installed',
!                          $package->name, $package->version );
      }
      else {
!         my $installed_package = eval {
!             OpenInteract2::Package->install({
!                     package_file => $package_file,
!                     repository   => CTX->repository
!             })
          };
          if ( $@ ) {
!             $status{is_ok}   = 'no';
!             $status{message} = "Error: $@";
!         }
!         else {
!             $status{is_ok}   = 'yes';
!             $status{package} = $installed_package->name;
!             $status{version} = $installed_package->version;
!             $status{message} =
!                 sprintf( 'Installed package %s-%s to website %s',
!                          $installed_package->name, $installed_package->version,
!                          $self->param( 'website_dir' ) );
!             eval {
!                 $self->_create_temp_lib_refresh( $installed_package->name )
!             };
!             if ( $@ ) {
!                 $status{message} .= "\nNOTE: Could not create temp lib refresh " .
!                                     "file, so you may need to delete it manually.";
!             }
          }
-         $self->param( package => $installed_package );
      }
      $self->notify_observers(
          progress => "Finished with installation of $full_package_name" );
  
!     $self->_add_status( \%status );
!     return;
  }
  
  # Let the site know that a new package has been installed by creating
  # the 'refresh' file for the temporary library
--- 66,194 ----
  sub run_task {
      my ( $self ) = @_;
      my %status = (
          action   => 'install package',
      );
+     if ( my $package_file = $self->param( 'package_file' ) ) {
+         $self->_install_file( $package_file, \%status );
+     }
+     elsif ( my $app_class = $self->param( 'package_class' ) ) {
+         $self->_install_app( $app_class, \%status );
+     }
+     $self->_add_status( \%status );
+ }
+ 
+ sub _install_file {
+     my ( $self, $package_file, $status ) = @_;
+     $status->{filename} = $package_file;
+ 
      my $package = OpenInteract2::Package->new({
          package_file => $package_file
      });
+     my $is_installed = $self->_check_package_exists(
+         $package->name, $package->version, $status );
+     return if ( $is_installed );
+ 
      my $full_package_name = $package->full_name;
!     my $installed_package = eval {
!         OpenInteract2::Package->install({
!             package_file => $package_file,
!             repository   => CTX->repository
!         })
!         };
!     if ( $@ ) {
!         $status->{is_ok}   = 'no';
!         $status->{message} = "Error: $@";
      }
      else {
!         $status->{is_ok}   = 'yes';
!         $status->{package} = $installed_package->name;
!         $status->{version} = $installed_package->version;
!         $status->{message} =
!             sprintf( 'Installed package %s-%s to website %s',
!                      $installed_package->name, $installed_package->version,
!                      $self->param( 'website_dir' ) );
!         eval {
!             $self->_create_temp_lib_refresh( $installed_package->name )
          };
          if ( $@ ) {
!             $status->{message} .= "\nNOTE: Could not create temp lib refresh " .
!                 "file, so you may need to delete it manually.";
          }
      }
+     $self->param( package => $installed_package );
      $self->notify_observers(
          progress => "Finished with installation of $full_package_name" );
+ }
  
! sub _install_app {
!     my ( $self, $app_class, $status ) = @_;
!     $status->{class} = $app_class;
!     eval "require $app_class";
!     if ( $@ ) {
!         $status->{is_ok} = 'no';
!         $status->{message} = "Failed to require '$app_class': $@";
!         return;
!     }
!     my $app = $app_class->new();
!     my $name    = $app->name;
!     my $version = $app->version;
!     my $is_installed = $self->_check_package_exists(
!         $name, $version, $status );
!     return if ( $is_installed );
! 
!     my $brick_name = $app->get_brick_name();
!     unless ( $brick_name ) {
!         oi_error "Cannot install from class $app_class - it does not have ",
!                  "method 'get_brick_name()' defined.";
!     }
!     my $brick = OpenInteract2::Brick->new( $brick_name );
! 
!     my $base_pkg_dir = CTX->lookup_directory( 'package' );
!     my $pkg_dir = catdir( $base_pkg_dir, "$name-$version" );
! 
!     $brick->copy_all_resources_to( $pkg_dir );
!     my $repository = CTX->repository;
! 
!     # the package directory is stocked, so instantiate
!     my $package = OpenInteract2::Package->new({
!         directory  => $pkg_dir,
!         repository => $repository,
!     });
! 
!     # ...and copy the conf/ files to the site as working copies
!     $package->copy_configuration_to_website();
! 
!     $repository->add_package( $package );
! 
!     $status->{is_ok}   = 'yes';
!     $status->{package} = $name;
!     $status->{version} = $version;
!     $status->{message} = sprintf(
!         'Installed package %s-%s to website %s',
!         $name, $version, $self->param( 'website_dir' )
!     );
! 
!     $self->notify_observers(
!         progress => "Finished with installation of $name-$version" );
  }
  
+ sub _check_package_exists {
+     my ( $self, $name, $version, $status ) = @_;
+     my $repository = CTX->repository;
+     my $rep_package = $repository->fetch_package( $name );
+     if ( $rep_package && $rep_package->version == $version ) {
+         $status->{is_ok} = 'yes';
+         $status->{package} = $name;
+         $status->{version} = $version;
+         $status->{message} =
+             sprintf( 'Package %s-%s not upgraded, ' .
+                      'this version already installed',
+                      $name, $version );
+         return 1;
+     }
+     return 0;
+ }
+ 
+ 
  # Let the site know that a new package has been installed by creating
  # the 'refresh' file for the temporary library

[Openinteract-commits] CVS: OpenInteract2/lib/OpenInteract2 App.pm,1.1,1.2 Package.pm,1.51,1.52

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29942/lib/OpenInteract2

Modified Files:
	App.pm Package.pm 
Log Message:
OIN-72: be able to install an OI2 package from a CPAN dist

Index: App.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/App.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** App.pm	13 Feb 2005 20:44:28 -0000	1.1
--- App.pm	9 Mar 2005 20:26:22 -0000	1.2
***************
*** 5,8 ****
--- 5,10 ----
  use strict;
  use base qw( Class::Factory Class::Accessor::Fast );
+ use OpenInteract2::Brick;
+ use OpenInteract2::Config::Package;
  use OpenInteract2::Exception qw( oi_error );
  use OpenInteract2::Manage;
***************
*** 12,18 ****
  
  my @FIELDS = qw(
!     name version module_dependencies build_date
      author_names author_emails url has_sql_structures
  );
  
  sub list_apps {
--- 14,23 ----
  
  my @FIELDS = qw(
!     name version module_dependencies
      author_names author_emails url has_sql_structures
  );
+ __PACKAGE__->mk_accessors( @FIELDS );
+ 
+ # CLASS METHODS
  
  sub list_apps {
***************
*** 21,25 ****
  }
  
! sub install    { _must_implement( 'install', @_ ) }
  
  sub _must_implement {
--- 26,55 ----
  }
  
! 
! # OBJECT METHODS
! 
! sub init {
!     my ( $self ) = @_;
!     my $brick = OpenInteract2::Brick->new( $self->get_brick_name );
!     my $package_ini_info = $brick->load_resource( 'package.ini' );
!     my $package_conf = OpenInteract2::Config::Package->new({
!         content => $package_ini_info->{content},
!     });
!     $self->name( $package_conf->name );
!     $self->version( $package_conf->version );
!     $self->module_dependencies( $package_conf->module );
!     $self->author_names( [ $package_conf->author_names ] );
!     $self->author_emails( [ $package_conf->author_emails ] );
!     $self->url( $package_conf->url );
! 
!     my $manifest_info = $brick->load_resource( 'MANIFEST' );
!     my @struct_files = grep /^struct/, split /\r?\n/, $manifest_info->{content};
!     $self->has_sql_structures( scalar @struct_files );
!     return $self;
! }
! 
! 
! sub install        { _must_implement( 'install', @_ ) }
! sub get_brick_name { _must_implement( 'get_brick_name', @_ ) }
  
  sub _must_implement {
***************
*** 71,75 ****
         "Version:      ", $app->version, "\n",
         "Dependencies: ", join( ", ", $app->module_dependencies, "\n",
-        "Build date:   ", $app->build_date, "\n",
         "Authors:      ", join( ", ", $app->author_names ), "\n",
         "URL:          ", $app->url, "\n",
--- 101,104 ----
***************
*** 110,113 ****
--- 139,156 ----
  Installs the application to C<$website_dir>.
  
+ =head1 PROPERTIES
+ 
+ B<version>
+ 
+ B<module_dependencies>
+ 
+ B<author_names>
+ 
+ B<author_emails>
+ 
+ B<url>
+ 
+ B<has_sql_structures>
+ 
  =head1 SEE ALSO
  

Index: Package.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Package.pm,v
retrieving revision 1.51
retrieving revision 1.52
diff -C2 -d -r1.51 -r1.52
*** Package.pm	6 Mar 2005 15:06:36 -0000	1.51
--- Package.pm	9 Mar 2005 20:26:22 -0000	1.52
***************
*** 367,371 ****
      $installed_package->installed_date( scalar( localtime ) );
      $installed_package->_install_html_and_widget_files_to_website;
!     $installed_package->_install_conf_files_to_website;
      $log->is_info &&
          $log->info( "Copied package files to website ok" );
--- 367,371 ----
      $installed_package->installed_date( scalar( localtime ) );
      $installed_package->_install_html_and_widget_files_to_website;
!     $installed_package->copy_configuration_to_website();
      $log->is_info &&
          $log->info( "Copied package files to website ok" );
***************
*** 380,383 ****
--- 380,418 ----
  }
  
+ sub copy_configuration_to_website {
+     my ( $self ) = @_;
+     return unless ( $self->repository );
+     my $website_dir     = $self->repository->website_dir;
+     my $package_dir     = rel2abs( $self->directory );
+     my $dest_conf_dir   = catdir( $website_dir, 'conf', $self->name );
+     my $dest_update_dir = catdir( $dest_conf_dir, 'updates' );
+ 
+     mkpath( $dest_conf_dir )  unless ( -d $dest_conf_dir );
+ 
+     my @conf_files = grep /^conf/, @{ $self->get_files };
+     my @to_checksum = ();
+     my %checksums = $self->_read_conf_checksums( $dest_conf_dir );
+ FILE:
+     foreach my $src_base ( @conf_files ) {
+         my $src_path  = catfile( $package_dir, $src_base );
+         my $filename  = basename( $src_path );
+         my $dest_path = catfile( $dest_conf_dir, $filename );
+         if ( -f $dest_path ) {
+             my $md5 = OpenInteract2::Util->digest_file( $src_path );
+             next FILE if ( $checksums{ $filename } eq $md5 );
+             my $update_path =
+                 catfile( $dest_update_dir, $filename . '-' . $self->version );
+             $self->_create_full_path( $update_path );
+             cp( $src_path, $update_path )
+                 || oi_error "Cannot copy $src_path -> $update_path: $!";
+         }
+         else {
+             cp( $src_path, $dest_path )
+                 || oi_error "Cannot copy $src_path -> $dest_path: $!";
+             push @to_checksum, $filename;
+         }
+     }
+     $self->_write_conf_checksums( $dest_conf_dir, @to_checksum );
+ }
  
  ########################################
***************
*** 770,810 ****
  }
  
- sub _install_conf_files_to_website {
-     my ( $self ) = @_;
-     my $website_dir     = $self->repository->website_dir;
-     my $package_dir     = rel2abs( $self->directory );
-     my $dest_conf_dir   = catdir( $website_dir, 'conf', $self->name );
-     unless ( -d $dest_conf_dir ) {
-         mkpath( $dest_conf_dir );
-     }
-     my $dest_update_dir = catdir( $dest_conf_dir, 'updates' );
- 
-     my @conf_files = grep /^conf/, @{ $self->get_files };
-     my @to_checksum = ();
-     my %checksums = $self->_read_conf_checksums( $dest_conf_dir );
- FILE:
-     foreach my $src_base ( @conf_files ) {
-         my $src_path  = catfile( $package_dir, $src_base );
-         my $filename  = basename( $src_path );
-         my $dest_path = catfile( $dest_conf_dir, $filename );
- 
-         if ( -f $dest_path ) {
-             my $md5 = OpenInteract2::Util->digest_file( $src_path );
-             next FILE if ( $checksums{ $filename } eq $md5 );
-             my $update_path =
-                 catfile( $dest_update_dir, $filename . '-' . $self->version );
-             $self->_create_full_path( $update_path );
-             cp( $src_path, $update_path )
-                 || oi_error "Cannot copy $src_path -> $update_path: $!";
-         }
-         else {
-             cp( $src_path, $dest_path )
-                 || oi_error "Cannot copy $src_path -> $dest_path: $!";
-             push @to_checksum, $filename;
-         }
-     }
-     $self->_write_conf_checksums( $dest_conf_dir, @to_checksum );
- }
- 
  sub _read_conf_checksums {
      my ( $self, $conf_dir ) = @_;
--- 805,808 ----

[Openinteract-commits] CVS: OpenInteract2 MANIFEST,1.120,1.121

[Salve J. N. <sj...@us...>]

Update of /cvsroot/openinteract/OpenInteract2
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24718

Modified Files:
	MANIFEST 
Log Message:
OIN-142: added CreateSecurityForAction.pm and CreateSecurityForSPOPS.pm


Index: MANIFEST
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/MANIFEST,v
retrieving revision 1.120
retrieving revision 1.121
diff -C2 -d -r1.120 -r1.121
*** MANIFEST	8 Mar 2005 14:29:45 -0000	1.120
--- MANIFEST	8 Mar 2005 14:59:23 -0000	1.121
***************
*** 117,120 ****
--- 117,122 ----
  lib/OpenInteract2/Manage/Website/Create.pm
  lib/OpenInteract2/Manage/Website/CreateSecurity.pm
+ lib/OpenInteract2/Manage/Website/CreateSecurityForAction.pm
+ lib/OpenInteract2/Manage/Website/CreateSecurityForSPOPS.pm
  lib/OpenInteract2/Manage/Website/CreateSuperuserPassword.pm
  lib/OpenInteract2/Manage/Website/InstallPackage.pm

[Openinteract-commits] CVS: OpenInteract2/lib/OpenInteract2/TT2 Plugin.pm,1.17,1.18

[Salve J. N. <sj...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/TT2
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv17536/lib/OpenInteract2/TT2

Modified Files:
	Plugin.pm 
Log Message:
Propagate date format to _create_date_object, so that formats actually
are used.


Index: Plugin.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/TT2/Plugin.pm,v
retrieving revision 1.17
retrieving revision 1.18
diff -C2 -d -r1.17 -r1.18
*** Plugin.pm	17 Feb 2005 05:05:02 -0000	1.17
--- Plugin.pm	8 Mar 2005 14:33:19 -0000	1.18
***************
*** 222,226 ****
      return undef unless ( $date_string );
      $log ||= get_logger( LOG_TEMPLATE );
!     my $date = _create_date_object( $date_string );
      unless ( $date ) {
          $log->error( "Cannot parse '$date_string' into valid date" );
--- 222,226 ----
      return undef unless ( $date_string );
      $log ||= get_logger( LOG_TEMPLATE );
!     my $date = _create_date_object( $date_string, $format );
      unless ( $date ) {
          $log->error( "Cannot parse '$date_string' into valid date" );

[Openinteract-commits] CVS: OpenInteract2 MANIFEST,1.119,1.120

[Salve J. N. <sj...@us...>]

Update of /cvsroot/openinteract/OpenInteract2
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16797

Modified Files:
	MANIFEST 
Log Message:
Add OpenInteract2::CreateSecurity


Index: MANIFEST
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/MANIFEST,v
retrieving revision 1.119
retrieving revision 1.120
diff -C2 -d -r1.119 -r1.120
*** MANIFEST	4 Mar 2005 03:49:44 -0000	1.119
--- MANIFEST	8 Mar 2005 14:29:45 -0000	1.120
***************
*** 87,90 ****
--- 87,91 ----
  lib/OpenInteract2/Conversion/SPOPSConfig.pm
  lib/OpenInteract2/Cookie.pm
+ lib/OpenInteract2/CreateSecurity.pm
  lib/OpenInteract2/Datasource/DBI.pm
  lib/OpenInteract2/Datasource/LDAP.pm

[Openinteract-commits] CVS: OpenInteract2/extra_packages/classified MANIFEST,1.3,1.4

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/classified
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18800/classified

Modified Files:
	MANIFEST 
Log Message:
fix listing


Index: MANIFEST
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/extra_packages/classified/MANIFEST,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** MANIFEST	6 Mar 2005 16:10:58 -0000	1.3
--- MANIFEST	6 Mar 2005 17:00:31 -0000	1.4
***************
*** 6,10 ****
  conf/spops_classified.ini
  data/install_security.dat
- doc/classified.pod
  OpenInteract2/Action/Classified.pm
  OpenInteract2/App/Classified.pm
--- 6,9 ----

[Openinteract-commits] CVS: OpenInteract2/extra_packages/wiki MANIFEST,1.2,1.3

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/wiki
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv17559

Modified Files:
	MANIFEST 
Log Message:
fix listing


Index: MANIFEST
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/extra_packages/wiki/MANIFEST,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** MANIFEST	23 Nov 2004 12:29:31 -0000	1.2
--- MANIFEST	6 Mar 2005 16:55:16 -0000	1.3
***************
*** 2,8 ****
  MANIFEST
  MANIFEST.SKIP
! package.conf
  conf/action.ini
- doc/wiki.pod
  msg/wiki_messages-en.msg
  OpenInteract2/Wiki.pm
--- 2,7 ----
  MANIFEST
  MANIFEST.SKIP
! package.ini
  conf/action.ini
  msg/wiki_messages-en.msg
  OpenInteract2/Wiki.pm
***************
*** 10,13 ****
--- 9,13 ----
  OpenInteract2/Wiki/Formatter.pm
  OpenInteract2/Action/Wiki.pm
+ OpenInteract2/App/Wiki.pm
  OpenInteract2/SQLInstall/Wiki.pm
  template/all_nodes.tmpl

[Openinteract-commits] CVS: OpenInteract2/extra_packages/tips_quotes_cw MANIFEST.SKIP,1.1,1.2 MANIFEST,1.2,1.3

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/tips_quotes_cw
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv17087

Modified Files:
	MANIFEST.SKIP MANIFEST 
Log Message:
fixes...


Index: MANIFEST.SKIP
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/extra_packages/tips_quotes_cw/MANIFEST.SKIP,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** MANIFEST.SKIP	3 Jun 2004 13:04:41 -0000	1.1
--- MANIFEST.SKIP	6 Mar 2005 16:54:11 -0000	1.2
***************
*** 1,2 ****
--- 1,3 ----
+ \.log$
  \bCVS\b
  ~$

Index: MANIFEST
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/extra_packages/tips_quotes_cw/MANIFEST,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** MANIFEST	25 Sep 2004 18:22:23 -0000	1.2
--- MANIFEST	6 Mar 2005 16:54:11 -0000	1.3
***************
*** 2,8 ****
  MANIFEST
  MANIFEST.SKIP
! package.conf
  conf/action.ini
- doc/tips_quotes_cw.pod
  OpenInteract2/JHIQuote.pm
  OpenInteract2/LarryWallQuote.pm
--- 2,7 ----
  MANIFEST
  MANIFEST.SKIP
! package.ini
  conf/action.ini
  OpenInteract2/JHIQuote.pm
  OpenInteract2/LarryWallQuote.pm
***************
*** 12,13 ****
--- 11,13 ----
  OpenInteract2/RandomQuote.pm
  OpenInteract2/ShaolinPrinciples.pm
+ OpenInteract2/App/TipsQuotesCw.pm

[Openinteract-commits] CVS: OpenInteract2/extra_packages/tips_quotes_cw/OpenInteract2 ShaolinPrinciples.pm,1.1,1.2

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/tips_quotes_cw/OpenInteract2
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv17087/OpenInteract2

Modified Files:
	ShaolinPrinciples.pm 
Log Message:
fixes...


Index: ShaolinPrinciples.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/extra_packages/tips_quotes_cw/OpenInteract2/ShaolinPrinciples.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** ShaolinPrinciples.pm	25 Sep 2004 18:22:22 -0000	1.1
--- ShaolinPrinciples.pm	6 Mar 2005 16:54:11 -0000	1.2
***************
*** 14,20 ****
          my $raw = <DATA>;
          my @raw_quotes = split( "%%\n", $raw );
!         foreach my $quote ( @raw_quotes ) {
!             chomp $quote;
!             push @QUOTES, [ $lines[0], $quote ];
          }
  }
--- 14,21 ----
          my $raw = <DATA>;
          my @raw_quotes = split( "%%\n", $raw );
!         foreach my $full_quote ( @raw_quotes ) {
!             chomp $full_quote;
!             my ( $linenum, $quote ) = split /\s/, $full_quote, 2;
!             push @QUOTES, [ $linenum, $quote ];
          }
  }
***************
*** 26,37 ****
  
  sub get_wrapped {
!     my ( $advice, $source ) = get();
      local $Text::Wrap::columns = 60;
!     return ( wrap( undef, undef, $advice ), $source );
  }
  
  sub get_html {
!     my ( $advice, $source ) = get();
!     return HTML::Entities::encode( $advice );
  }
  
--- 27,38 ----
  
  sub get_wrapped {
!     my ( $num, $principle ) = get();
      local $Text::Wrap::columns = 60;
!     return wrap( undef, undef, "$num: $principle" );
  }
  
  sub get_html {
!     my ( $num, $principle ) = get();
!     return "<b>$num</b>: " . HTML::Entities::encode( $principle );
  }
  
***************
*** 51,55 ****
  
   use OpenInteract2::ShaolinPrinciples;
!  my ( $advice, $source, $advice_num ) = OpenInteract2::ShaolinPrinciple->get;
   
   print "In HTML: ", OpenInteract2::ShaolinPrinciple->get_html();
--- 52,56 ----
  
   use OpenInteract2::ShaolinPrinciples;
!  my ( $principle_num, $principle ) = OpenInteract2::ShaolinPrinciple->get;
   
   print "In HTML: ", OpenInteract2::ShaolinPrinciple->get_html();
***************
*** 134,138 ****
  30 March the Long Road
  %%
! 31 Don`t Allways Apologize
  %%
  32 Find Beauty Everywhere
--- 135,139 ----
  30 March the Long Road
  %%
! 31 Don't Allways Apologize
  %%
  32 Find Beauty Everywhere
***************
*** 162,166 ****
  44 Allow Your Opponent to Save Face
  %%
! 45 Don t be a Perfectionist
  %%
  46 Applaud the Courage of the White Belt
--- 163,167 ----
  44 Allow Your Opponent to Save Face
  %%
! 45 Don't be a Perfectionist
  %%
  46 Applaud the Courage of the White Belt
***************
*** 172,176 ****
  49 Focus on Your Priorities
  %%
! 50 Don t Complicate Matters
  %%
  51 Assume Leadership
--- 173,177 ----
  49 Focus on Your Priorities
  %%
! 50 Don't Complicate Matters
  %%
  51 Assume Leadership
***************
*** 254,258 ****
  90 Form Your Day
  %%
! 91 Do What Others Can t
  %%
  92 Build Upon Your Basics
--- 255,259 ----
  90 Form Your Day
  %%
! 91 Do What Others Can't
  %%
  92 Build Upon Your Basics

[Openinteract-commits] CVS: OpenInteract2/script translate_doc_to_app.pl,NONE,1.1

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/script
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15183

Added Files:
	translate_doc_to_app.pl 
Log Message:
add script to move docs/mypackage.pod -> OpenInteract2/App/MyPackage.pm


--- NEW FILE: translate_doc_to_app.pl ---
#!/usr/bin/perl

use strict;
use File::Basename        qw( dirname );
use File::Path            qw( mkpath );
use File::Spec::Functions qw( rel2abs splitdir );
use OpenInteract2::Util;
use Template;

unless ( -f 'package.ini' ) {
    die "Run this script in your package's topmost directory.\n";
}

my @full_dirs = splitdir( rel2abs( '.' ) );
my $pkg_name  = pop( @full_dirs );
my $class_name = ucfirst $pkg_name;
$class_name =~ s/_(\w)/\U$1\U/g;
my $doc_file = "doc/$pkg_name.pod";
my $pod = ( -f $doc_file ) ? OpenInteract2::Util->read_file( $doc_file ) : '';
my $app_file = "OpenInteract2/App/$class_name.pm";
mkpath( dirname( $app_file ) );

my $template = Template->new();
$template->process( \*DATA, {
    class_name   => $class_name,
    package_name => $pkg_name,
    pod          => $pod
}, $app_file ) || die "Cannot generate App file: ", $template->error();
print "Created $app_file ok\n";

__DATA__
package OpenInteract2::App::[% class_name %];

use strict;
use base qw( Exporter OpenInteract2::App );
use OpenInteract2::Manage;

$OpenInteract2::App::[% class_name %]::VERSION = sprintf("%d.%02d", q$Revision: 1.1 $ =~ /(\d+)\.(\d+)/);
@OpenInteract2::App::[% class_name %]::EXPORT  = qw( install );

sub get_brick_name {
    return '[% package_name %]';
}

# Not a method, just an exported sub
sub install {
    my ( $website_dir ) = @_;
    my $manage = OpenInteract2::Manage->new( 'install_package' );
    $manage->param( website_dir   => $website_dir );
    $manage->param( package_class => __PACKAGE__ );
    return $manage->execute;
}

__END__

=pod

=head1 NAME

OpenInteract2::App::[% class_name %] - This application will do everything!

[% pod %]

=cut

[Openinteract-commits] CVS: OpenInteract2/script translate_package_to_ini.pl,1.1,1.2

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/script
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15054

Modified Files:
	translate_package_to_ini.pl 
Log Message:
just modify the format so 'config_watcher' fits in


Index: translate_package_to_ini.pl
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/script/translate_package_to_ini.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** translate_package_to_ini.pl	28 Feb 2005 01:34:00 -0000	1.1
--- translate_package_to_ini.pl	6 Mar 2005 16:45:28 -0000	1.2
***************
*** 57,61 ****
  # Translate to INI, manually so we can control order and format
  
! my $fmt = "%-13s = %s\n";
  
  print "[package]\n";
--- 57,61 ----
  # Translate to INI, manually so we can control order and format
  
! my $fmt = "%-15s = %s\n";
  
  print "[package]\n";

[Openinteract-commits] CVS: OpenInteract2/extra_packages/tips_quotes_cw/OpenInteract2/App TipsQuotesCw.pm,NONE,1.1

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/tips_quotes_cw/OpenInteract2/App
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14751/OpenInteract2/App

Added Files:
	TipsQuotesCw.pm 
Log Message:
move package to new format (package.conf -> package.ini; move doc/ -> OI2::App)


--- NEW FILE: TipsQuotesCw.pm ---
package OpenInteract2::App::TipsQuotesCw;

use strict;
use base qw( Exporter OpenInteract2::App );
use OpenInteract2::Manage;

$OpenInteract2::App::TipsQuotesCw::VERSION = sprintf("%d.%02d", q$Revision: 1.1 $ =~ /(\d+)\.(\d+)/);
@OpenInteract2::App::TipsQuotesCw::EXPORT  = qw( install );

sub get_brick_name {
    return 'tips_quotes_cw';
}

# Not a method, just an exported sub
sub install {
    my ( $website_dir ) = @_;
    my $manage = OpenInteract2::Manage->new( 'install_package' );
    $manage->param( website_dir   => $website_dir );
    $manage->param( package_class => __PACKAGE__ );
    return $manage->execute;
}

__END__

=pod

=head1 NAME

OpenInteract2::App::TipsQuotesCw - OpenInteract format for different tips and quotes

=head1 SYNOPSIS

 # Stick a quote right in a page
 
 [% USE Quote %]
 
 A quote for you: [% Quote.any() %]
 
 # Add a box for a particular quote type
 
 [% OI.box_add( 'lwall_quote_box' ) %]

=head1 DESCRIPTION

Wrapper around different quote collections.

=head1 OBJECTS

No SPOPS objects are created, but this package has a Template plugin
called L<OpenInteract::QuotePlugin|OpenInteract::QuotePlugin>.

=head1 ACTIONS

B<jhi_quote_box>: Adds a box with a quote from Jarkko Hietaniemi

B<lwall_quote_box>: Adds a box with a quote from Larry Wall

B<mjd_quote_box>: Adds a box with programming advice from MJD

B<pptip_quote_box>: Adds a box with a tip from "The Pragmatic Programmer"

B<random_quote_box>: Adds a box with a quote from other sources.

=head1 RULESETS

No rulesets defined in this package.

=head1 AUTHORS

Chris Winters (ch...@cw...)

(all the quote/tip originators are given props in their respective
classes)

=cut

[Openinteract-commits] CVS: OpenInteract2/extra_packages/tips_quotes_cw package.ini,NONE,1.1 Changes,1.3,1.4 package.conf,1.3,NONE

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/tips_quotes_cw
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14751

Modified Files:
	Changes 
Added Files:
	package.ini 
Removed Files:
	package.conf 
Log Message:
move package to new format (package.conf -> package.ini; move doc/ -> OI2::App)


--- NEW FILE: package.ini ---
[package]
name            = tips_quotes_cw
version         = 1.04
author          = Chris Winters <ch...@cw...>
url             = http://www.cwinters.com/
sql_installer   = 
description     = Different quotes for using in a website. Currently we have \
   Larry Wall quotes, advice from Mark-Jason Dominus and tips from "The Pragmatic Programmer" 

[package template_plugin]
Quote           = OpenInteract2::QuotePlugin

Index: Changes
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/extra_packages/tips_quotes_cw/Changes,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** Changes	28 Nov 2004 04:27:51 -0000	1.3
--- Changes	6 Mar 2005 16:44:17 -0000	1.4
***************
*** 1,4 ****
--- 1,8 ----
  Revision history for OpenInteract package tips_quotes_cw.
  
+ 1.04  Sun Mar  6 11:42:06 EST 2005
+ 
+       Move to new package format.
+ 
  1.03  Sat Nov 27 23:27:27 EST 2004
  

--- package.conf DELETED ---

[Openinteract-commits] CVS: OpenInteract2/extra_packages/tips_quotes_cw/doc tips_quotes_cw.pod,1.1,NONE

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/tips_quotes_cw/doc
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14751/doc

Removed Files:
	tips_quotes_cw.pod 
Log Message:
move package to new format (package.conf -> package.ini; move doc/ -> OI2::App)


--- tips_quotes_cw.pod DELETED ---

[Openinteract-commits] CVS: OpenInteract2/extra_packages/tips_quotes_cw/OpenInteract2/App - New directory

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/tips_quotes_cw/OpenInteract2/App
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14261/OpenInteract2/App

Log Message:
Directory /cvsroot/openinteract/OpenInteract2/extra_packages/tips_quotes_cw/OpenInteract2/App added to the repository

[Openinteract-commits] CVS: OpenInteract2/extra_packages/wiki package.ini,NONE,1.1 Changes,1.1,1.2 package.conf,1.1,NONE

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/wiki
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13411

Modified Files:
	Changes 
Added Files:
	package.ini 
Removed Files:
	package.conf 
Log Message:
move package to new format (package.conf -> package.ini; move doc/ -> OI2::App)


--- NEW FILE: package.ini ---
[package]
name            = wiki
version         = 0.02
author          = Chris Winters <ch...@cw...>
url             = http://www.openinteract.org/
module          = CGI
module          = CGI::Wiki
module          = Digest::MD5
module          = HTML::PullParser
module          = Text::WikiFormat
sql_installer   = OpenInteract2::SQLInstall::Wiki
description     = A simple wiki system integrated with your OI2 site. 

Index: Changes
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/extra_packages/wiki/Changes,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Changes	3 Jun 2004 13:04:43 -0000	1.1
--- Changes	6 Mar 2005 16:38:31 -0000	1.2
***************
*** 1,4 ****
--- 1,8 ----
  Revision history for OpenInteract2 package wiki.
  
+ 0.02  Sun Mar  6 11:35:46 EST 2005
+ 
+       Move to new package format.
+ 
  0.01  Wed Jun  2 17:29:36 2004
  

--- package.conf DELETED ---

[Openinteract-commits] CVS: OpenInteract2/extra_packages/wiki/doc wiki.pod,1.1,NONE

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/wiki/doc
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13411/doc

Removed Files:
	wiki.pod 
Log Message:
move package to new format (package.conf -> package.ini; move doc/ -> OI2::App)


--- wiki.pod DELETED ---

[Openinteract-commits] CVS: OpenInteract2/extra_packages/wiki/OpenInteract2/App Wiki.pm,NONE,1.1

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/wiki/OpenInteract2/App
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13411/OpenInteract2/App

Added Files:
	Wiki.pm 
Log Message:
move package to new format (package.conf -> package.ini; move doc/ -> OI2::App)


--- NEW FILE: Wiki.pm ---
package OpenInteract2::App::Wiki;

use strict;
use base qw( Exporter OpenInteract2::App );
use OpenInteract2::Manage;

$OpenInteract2::App::Wiki::VERSION = sprintf("%d.%02d", q$Revision: 1.1 $ =~ /(\d+)\.(\d+)/);
@OpenInteract2::App::Wiki::EXPORT  = qw( install );

sub get_brick_name {
    return 'wiki';
}

# Not a method, just an exported sub
sub install {
    my ( $website_dir ) = @_;
    my $manage = OpenInteract2::Manage->new( 'install_package' );
    $manage->param( website_dir   => $website_dir );
    $manage->param( package_class => __PACKAGE__ );
    return $manage->execute;
}

__END__

=pod

=head1 NAME

OpenInteract2::App::Wiki - Implements a simple wiki in OpenInteract

=head1 SYNOPSIS

=head1 DESCRIPTION

=head1 OBJECTS

No objects created by this package.

=head1 ACTIONS

No actions defined in this package.

=head1 RULESETS

No rulesets defined in this package.

=head1 FILTERS

This package will implement a 'wiki' filter you can apply to other
content. This filter will find all wiki-type links in the given
content and transform them into HTML links.

=head1 SEE ALSO

L<CGI::Wiki>

=head1 AUTHORS

Chris Winters E<lt>ch...@cw...E<gt>


=cut

[Openinteract-commits] CVS: OpenInteract2/extra_packages/wiki/OpenInteract2/App - New directory

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/wiki/OpenInteract2/App
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13258/OpenInteract2/App

Log Message:
Directory /cvsroot/openinteract/OpenInteract2/extra_packages/wiki/OpenInteract2/App added to the repository

[Openinteract-commits] CVS: OpenInteract2/extra_packages/classified package.ini,NONE,1.1 MANIFEST,1.2,1.3 Changes,1.2,1.3 package.conf,1.2,NONE

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/classified
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6610

Modified Files:
	MANIFEST Changes 
Added Files:
	package.ini 
Removed Files:
	package.conf 
Log Message:
move package to new format (package.conf -> package.ini; move doc/ -> OI2::App)


--- NEW FILE: package.ini ---
[package]
name            = classified
version         = 2.02
author          = Chris Winters <ch...@cw...>
author          = Marcus Baker <mb...@in...>
url             = http://www.openinteract.org/
module          = Time::Piece
sql_installer   = OpenInteract2::SQLInstall::Classified
description     = This package implements a classified ad system within OpenInteract. 

Index: MANIFEST
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/extra_packages/classified/MANIFEST,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** MANIFEST	28 Nov 2004 07:31:43 -0000	1.2
--- MANIFEST	6 Mar 2005 16:10:58 -0000	1.3
***************
*** 2,6 ****
  MANIFEST
  MANIFEST.SKIP
! package.conf
  conf/action.ini
  conf/spops_classified.ini
--- 2,6 ----
  MANIFEST
  MANIFEST.SKIP
! package.ini
  conf/action.ini
  conf/spops_classified.ini
***************
*** 8,11 ****
--- 8,12 ----
  doc/classified.pod
  OpenInteract2/Action/Classified.pm
+ OpenInteract2/App/Classified.pm
  OpenInteract2/SQLInstall/Classified.pm
  struct/classified.sql

Index: Changes
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/extra_packages/classified/Changes,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Changes	28 Nov 2004 07:31:43 -0000	1.2
--- Changes	6 Mar 2005 16:10:58 -0000	1.3
***************
*** 1,4 ****
--- 1,8 ----
  Revision history for OpenInteract package classified.
  
+ 2.02  Sun Mar  6 10:57:17 EST 2005
+ 
+       Update to new package format.
+ 
  2.01  Sun Nov 28 02:30:26 EST 2004
  

--- package.conf DELETED ---

[Openinteract-commits] CVS: OpenInteract2/extra_packages/classified/OpenInteract2/App Classified.pm,NONE,1.1

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/classified/OpenInteract2/App
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6610/OpenInteract2/App

Added Files:
	Classified.pm 
Log Message:
move package to new format (package.conf -> package.ini; move doc/ -> OI2::App)


--- NEW FILE: Classified.pm ---
package OpenInteract2::App::Classified;

use strict;
use base qw( Exporter OpenInteract2::App );
use OpenInteract2::Manage;

$OpenInteract2::App::Classified::VERSION = sprintf("%d.%02d", q$Revision: 1.1 $ =~ /(\d+)\.(\d+)/);
@OpenInteract2::App::Classified::EXPORT  = qw( install );

sub get_brick_name {
    return 'classified';
}

# Not a method, just an exported sub
sub install {
    my ( $website_dir ) = @_;
    my $manage = OpenInteract2::Manage->new( 'install_package' );
    $manage->param( website_dir   => $website_dir );
    $manage->param( package_class => __PACKAGE__ );
    return $manage->execute;
}

__END__

=pod

=head1 NAME

OpenInteract2::App::Classified: Package to manage classified ads in OpenInteract

=head1 DESCRIPTION

Simple example application to manage classified ads.

=head1 OBJECTS

B<classified>

Represent a classified ad in OpenInteract. Normally any user may
create these but only administrators can modify or delete.

=head1 ACTIONS

B<classified>

Search, list, create, edit and remove classified ads. Note that this
is an example of using
L<OpenInteract::CommonHandler|OpenInteract::CommonHandler> to
implement most of the functionality in a handler.

=head1 RULESETS

No rulesets created by this package.

=head1 ERRORS

No custom errors defined by this package.

=head1 COPYRIGHT

Copyright (c) 2002-2005 Chris Winters. All rights reserved.

This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.

=head1 AUTHORS

Chris Winters E<lt>ch...@cw...E<gt>

=cut

[Openinteract-commits] CVS: OpenInteract2/extra_packages/classified/doc classified.pod,1.1,NONE

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/classified/doc
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6610/doc

Removed Files:
	classified.pod 
Log Message:
move package to new format (package.conf -> package.ini; move doc/ -> OI2::App)


--- classified.pod DELETED ---

[Openinteract-commits] CVS: OpenInteract2/extra_packages/classified/OpenInteract2/App - New directory

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/extra_packages/classified/OpenInteract2/App
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6189/OpenInteract2/App

Log Message:
Directory /cvsroot/openinteract/OpenInteract2/extra_packages/classified/OpenInteract2/App added to the repository