followme.pm (9780544f) followme.pm (b274bc22)
1#**************************************************************
2#
3# Licensed to the Apache Software Foundation (ASF) under one
4# or more contributor license agreements. See the NOTICE file
5# distributed with this work for additional information
6# regarding copyright ownership. The ASF licenses this file
7# to you under the Apache License, Version 2.0 (the
8# "License"); you may not use this file except in compliance

--- 79 unchanged lines hidden (view full) ---

88 push(@filecontent, "globals:compiler: $installer::globals::compiler\n");
89 push(@filecontent, "globals:product: $installer::globals::product\n");
90 push(@filecontent, "globals:minor: $installer::globals::minor\n");
91 push(@filecontent, "globals:lastminor: $installer::globals::lastminor\n");
92 push(@filecontent, "globals:nsisfilename: $installer::globals::nsisfilename\n");
93
94 # Saving file
95 installer::files::save_file($downloadinfodir . $installer::globals::separator . $downloadinfofilename, \@filecontent);
1#**************************************************************
2#
3# Licensed to the Apache Software Foundation (ASF) under one
4# or more contributor license agreements. See the NOTICE file
5# distributed with this work for additional information
6# regarding copyright ownership. The ASF licenses this file
7# to you under the Apache License, Version 2.0 (the
8# "License"); you may not use this file except in compliance

--- 79 unchanged lines hidden (view full) ---

88 push(@filecontent, "globals:compiler: $installer::globals::compiler\n");
89 push(@filecontent, "globals:product: $installer::globals::product\n");
90 push(@filecontent, "globals:minor: $installer::globals::minor\n");
91 push(@filecontent, "globals:lastminor: $installer::globals::lastminor\n");
92 push(@filecontent, "globals:nsisfilename: $installer::globals::nsisfilename\n");
93
94 # Saving file
95 installer::files::save_file($downloadinfodir . $installer::globals::separator . $downloadinfofilename, \@filecontent);
96 installer::logger::print_message( "... creating \"follow me\" info file $downloadinfofilename.\n" );
96 $installer::logger::Info->printf("... creating \"follow me\" info file %s.\n", $downloadinfofilename);
97}
98
99####################################################
100# Reading the file, that contains all information
101# to create a follow up process.
102####################################################
103
104sub read_followme_info
105{
106 my ( $filename ) = @_;
107
108 if ( ! -f $filename ) { installer::exiter::exit_program("ERROR: Could not find file: $filename", "read_download_info"); }
109
97}
98
99####################################################
100# Reading the file, that contains all information
101# to create a follow up process.
102####################################################
103
104sub read_followme_info
105{
106 my ( $filename ) = @_;
107
108 if ( ! -f $filename ) { installer::exiter::exit_program("ERROR: Could not find file: $filename", "read_download_info"); }
109
110 installer::logger::print_message( "\n... reading \"follow me\" info file $filename\n" );
110 $installer::logger::Info->print("\n");
111 $installer::logger::Info->printf("... reading \"follow me\" info file %s\n", $filename);
111
112 my %contenthash = ();
113
114 my $finalinstalldir = "";
115 my $downloadname = "";
116 my $currentinstallnumber = "";
117 my $loggingdir = "";
118 my $installlogdir = "";

--- 93 unchanged lines hidden --- 		112
113 my %contenthash = ();
114
115 my $finalinstalldir = "";
116 my $downloadname = "";
117 my $currentinstallnumber = "";
118 my $loggingdir = "";
119 my $installlogdir = "";

--- 93 unchanged lines hidden ---