Ignore:
Timestamp:
May 8, 2012, 4:12:21 AM (7 years ago)
Author:
bruno
Message:

project-builder-r1426

File:
1 edited

Legend:

Unmodified
Added
Removed
  • devel/lib/ProjectBuilder/Base.pm

    r1498 r1500  
    3939
    4040our @ISA = qw(Exporter);
    41 our @EXPORT = qw(pb_mkdir_p pb_system pb_rm_rf pb_get_date pb_log pb_log_init pb_get_uri pb_get_content pb_set_content pb_display_file pb_syntax_init pb_syntax pb_temp_init pb_get_arch pb_check_requirements pb_check_req $pbdebug $pbLOG $pbdisplaytype $pblocale);
     41our @EXPORT = qw(pb_mkdir_p pb_system pb_rm_rf pb_get_date pb_log pb_log_init pb_get_uri pb_get_content pb_set_content pb_display_file pb_syntax_init pb_syntax pb_temp_init pb_get_arch pb_get_osrelease pb_check_requirements pb_check_req $pbdebug $pbLOG $pbdisplaytype $pblocale);
    4242($VERSION,$REVISION) = pb_version_init();
    4343
     
    5050=head1 DESCRIPTION
    5151
    52 This modules provides generic functions suitable for perl project development
     52This module provides generic functions suitable for perl project development
    5353
    5454=head1 SYNOPSIS
     
    384384}
    385385
     386=item B<pb_get_osrelease>
     387
     388This function returns the release of our operating system
     389
     390=cut
     391
     392sub pb_get_osrelease {
     393
     394# On linux can also use /proc/sys/kernel/osrelease
     395my $rel = `uname -r`;
     396chomp($rel);
     397return($rel);
     398}
     399
     400
    386401=item B<pb_get_arch>
    387402
     
    467482} else {
    468483    pb_log(2,"OK\n");
    469     return($found);
    470 }
     484}
     485return($found);
    471486}
    472487
Note: See TracChangeset for help on using the changeset viewer.