Lines Matching refs:module
153 my $module = shift;
154 if (defined ${$self->{MODULE_REPOSITORY}}{$module}) {
155 return ${$self->{MODULE_REPOSITORY}}{$module};
157 Carp::cluck("No such module $module in active repositories!!\n");
164 my $module = shift;
165 if (defined ${$self->{MODULE_PATHS}}{$module}) {
166 return ${$self->{MODULE_PATHS}}{$module};
168 Carp::cluck("No path for module $module in active repositories!!\n") if ($debug);
175 my $module = shift;
176 if (defined ${$self->{MODULE_BUILD_LIST_PATHS}}{$module}) {
177 return ${$self->{MODULE_BUILD_LIST_PATHS}}{$module};
181 my $possible_path = ${$self->{MODULE_PATHS}}{$module} . "/prj/$_";
183 ${$self->{MODULE_BUILD_LIST_PATHS}}{$module} = $possible_path;
187 Carp::cluck("No build list in module $module found!!\n") if ($self->{DEBUG});
195 my $module = shift;
211 my $module = shift;
213 return exists ($self->{ACTIVATED_MODULES}{$module});
215 return exists ($self->{REAL_MODULES}{$module});
225 foreach my $module (readdir(DIRHANDLE)) {
226 next if (($module =~ /^\.+/) || (!-d "$repository_path/$module"));
227 my $module_entry = $module;
228 if (($module !~ s/\.lnk$//) && ($module !~ s/\.link$//)) {
229 $self->{REAL_MODULES}{$module}++;
233 if (defined ${$self->{MODULE_PATHS}}{$module}) {
235 …croak("Ambiguous paths for module $module: $possible_path and " . ${$self->{MODULE_PATHS}}{$module…
237 ${$self->{MODULE_PATHS}}{$module} = $possible_path;
238 ${$self->{MODULE_REPOSITORY}}{$module} = $repository;
397 foreach my $module (sort @$module_list_ref) {
398 if ($self->get_module_path($module)) {
399 push(@real_modules, $module);
401 $ignored_modules_string .= " $module";