diff --git a/doc/dev/dolibarr-doxygen-build.pl b/doc/dev/dolibarr-doxygen-build.pl index f729f271c56..daa2315663d 100755 --- a/doc/dev/dolibarr-doxygen-build.pl +++ b/doc/dev/dolibarr-doxygen-build.pl @@ -1,28 +1,28 @@ -#!/usr/bin/perl -#-------------------------------------------------- -# Lance la generation de la doc dev doxygen -#-------------------------------------------------- - -# Detecte repertoire du script +#!/usr/bin/perl +#-------------------------------------------------- +# Lance la generation de la doc dev doxygen +#-------------------------------------------------- + +# Detecte repertoire du script ($DIR=$0) =~ s/([^\/\\]+)$//; -$DIR||='.'; +$DIR||='.'; $DIR =~ s/([^\/\\])[\\\/]+$/$1/; - - -use Cwd; -my $dir = getcwd; - -print "Current dir is: $dir\n"; -print "Running dir for doxygen must be: $DIR/../..\n"; - -if (! -s "doc/dev/dolibarr-doxygen") { - print "Error: current directory for building Dolibarr doxygen documentation is not correct.\n"; - exit 1; -} - -print "Running doxygen, please wait...\n"; -$result=`doxygen doc/dev/dolibarr-doxygen 2>&1`; - -print $result; - -0; + + +use Cwd; +my $dir = getcwd; + +print "Current dir is: $dir\n"; +print "Running dir for doxygen must be: $DIR/../..\n"; + +if (! -s "doc/dev/dolibarr-doxygen") { + print "Error: current directory for building Dolibarr doxygen documentation is not correct.\n"; + exit 1; +} + +print "Running doxygen, please wait...\n"; +$result=`doxygen doc/dev/dolibarr-doxygen 2>&1`; + +print $result; + +0;