App-TimeTracker

 view release on metacpan or  search on metacpan

Build.PL  view on Meta::CPAN

    "Moose::Util::TypeConstraints" => 0,
    "MooseX::Getopt" => 0,
    "MooseX::Storage" => 0,
    "MooseX::Storage::Format::JSONpm" => 0,
    "MooseX::Types::Path::Class" => 0,
    "Path::Class" => 0,
    "Path::Class::Iterator" => 0,
    "Scalar::Util" => 0,
    "Term::ANSIColor" => 0,
    "Text::Table" => 0,
    "Try::Tiny" => 0,
    "User::pwent" => 0,
    "constant" => 0,
    "namespace::autoclean" => 0,
    "parent" => 0,
    "perl" => "5.010"
  },
  "script_files" => [
    "bin/tracker",
    "bin/tracker_bash_autocomplete"
  ],

META.json  view on Meta::CPAN

            "Moose::Util::TypeConstraints" : "0",
            "MooseX::Getopt" : "0",
            "MooseX::Storage" : "0",
            "MooseX::Storage::Format::JSONpm" : "0",
            "MooseX::Types::Path::Class" : "0",
            "Path::Class" : "0",
            "Path::Class::Iterator" : "0",
            "Scalar::Util" : "0",
            "Term::ANSIColor" : "0",
            "Text::Table" : "0",
            "Try::Tiny" : "0",
            "User::pwent" : "0",
            "constant" : "0",
            "namespace::autoclean" : "0",
            "parent" : "0",
            "perl" : "5.010"
         }
      },
      "test" : {
         "requires" : {
            "File::Copy::Recursive" : "0",

cpanfile  view on Meta::CPAN

requires "Moose::Util::TypeConstraints" => "0";
requires "MooseX::Getopt" => "0";
requires "MooseX::Storage" => "0";
requires "MooseX::Storage::Format::JSONpm" => "0";
requires "MooseX::Types::Path::Class" => "0";
requires "Path::Class" => "0";
requires "Path::Class::Iterator" => "0";
requires "Scalar::Util" => "0";
requires "Term::ANSIColor" => "0";
requires "Text::Table" => "0";
requires "Try::Tiny" => "0";
requires "User::pwent" => "0";
requires "constant" => "0";
requires "namespace::autoclean" => "0";
requires "parent" => "0";
requires "perl" => "5.010";

on 'build' => sub {
  requires "Module::Build" => "0.28";
};

helper/convert_2_003_to_2_004.pl  view on Meta::CPAN

use strict;
use warnings;
use 5.010;

use File::Find::Rule;
use Data::Dumper;
use App::TimeTracker::Data::Task;
use App::TimeTracker::Proto;
use DateTime;
use Path::Class;
use Try::Tiny;
use JSON::XS;
use Path::Class;

$|=1;
my $app = App::TimeTracker::Proto->new;
my @files = File::Find::Rule->file()->name(qr/\.trc$/)
    ->in( $app->home );

foreach my $old (@files) {
    print '.';

helper/convert_legacy_data_to_json.pl  view on Meta::CPAN

use strict;
use warnings;
use 5.010;

use File::Find::Rule;
use Data::Dumper;
use App::TimeTracker::Data::Task;
use DateTime;
use Path::Class;
use Try::Tiny;

$|=1;
my ($in, $out) = @ARGV;
die "please specify dir containing old-style files" unless -d $in;
die "please specify dir to contain new-style files" unless -d $out;
$out = Path::Class::dir($out);

my @files = File::Find::Rule->file()->name(qr/\.(done|current)$/)
    ->in( $in );

lib/App/TimeTracker/Proto.pm  view on Meta::CPAN

use 5.010;

use App::TimeTracker::Utils qw(error_message);
use Moose;
use MooseX::Types::Path::Class;
use File::HomeDir ();
use Path::Class;
use Hash::Merge qw(merge);
use JSON::XS;
use Carp;
use Try::Tiny;
use App::TimeTracker::Data::Task;
use App::TimeTracker::Constants qw(MISSING_PROJECT_HELP_MSG);

has 'home' => (
    is         => 'ro',
    isa        => 'Path::Class::Dir',
    lazy_build => 1,
);

sub _build_home {