functionis_input_directoryprivate
logical function is_input_directory(s, directory)
True if directory is an input of the project, so that it not being a page is expected.
Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
| s | type(settings_t) | in | the settings | |
| directory | character(len=*) | in | the directory |
Result
| Name | Type | Attributes | Description |
|---|---|---|---|
| is_input_directory | logical |
Calls
Source
Show the code
logical function is_input_directory(s, directory)
type(settings_t), intent(in) :: s !! the settings
character(len=*), intent(in) :: directory !! the directory
is_input_directory = contains_string(s%src_dir, directory) .or. contains_string(s%html_template_dir, directory) .or. &
directory == s%output_dir
if (allocated(s%media_dir)) is_input_directory = is_input_directory .or. directory == s%media_dir
if (allocated(s%graph_dir)) is_input_directory = is_input_directory .or. directory == s%graph_dir
end function is_input_directory