Skip to content
Snippets Groups Projects
Commit 74a7960d authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

DeutscheBahn.pm: Fix new_from_html

parent b96b0a85
No related branches found
No related tags found
No related merge requests found
......@@ -75,9 +75,14 @@ sub new {
}
sub new_from_html {
my ( $obj, $html ) = @_;
my ( $obj, %opt ) = @_;
my $ref = { html => $html, };
my $ref = {
html => $opt{html},
post => { boardType => $opt{mode} // 'dep' }
};
$ref->{post}->{boardType} = $opt{mode} // 'dep';
$ref->{tree} = XML::LibXML->load_html(
string => $ref->{html},
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment