bm_get_html_description (public)

 bm_get_html_description html_code

Defined in packages/bookmarks/tcl/bookmarks-procs.tcl

Parameters:
html_code

Partial Call Graph (max 5 caller/called nodes):
%3 packages/bookmarks/www/bookmark-add-one.tcl packages/bookmarks/ www/bookmark-add-one.tcl bm_get_html_description bm_get_html_description packages/bookmarks/www/bookmark-add-one.tcl->bm_get_html_description packages/bookmarks/www/bookmarks-check.tcl packages/bookmarks/ www/bookmarks-check.tcl packages/bookmarks/www/bookmarks-check.tcl->bm_get_html_description parameter::get parameter::get (public) bm_get_html_description->parameter::get

Testcases:
No testcase defined.
Source code:
    set description ""
    regexp -nocase {<meta name="description" content="([^"]*)"} $html_code match description

    if {[string length $description]> [parameter::get -parameter URLDescriptionMaxLength] || [string length $description] > 3999 } {
    set description "[string range $description 0 3996]..."
    }

    return [string trim $description]
Generic XQL file:
packages/bookmarks/tcl/bookmarks-procs.xql

PostgreSQL XQL file:
packages/bookmarks/tcl/bookmarks-procs-postgresql.xql

Oracle XQL file:
packages/bookmarks/tcl/bookmarks-procs-oracle.xql

[ hide source ] | [ make this the default ]
Show another procedure: