[WM] Figuring out the order of processing.
jlm17
jlm17 at lucent.com
Wed Apr 28 20:44:37 IST 2004
I'm new to using webmake, and I am trying to create a new tag, <nsrlink> (a non-self-referential
link). Useability experts say that web pages shouldn't have links in them to themselves. I want to
follow this advice, so I want to be able to do something like this:
<nsrlink href="index.html">Home</nsrlink>
instead of:
<a href="index.html">Home</a>
and know that if the tag was placed into the index.html file it would not be a link, but if it was
placed in any other file it would be.
Ok, so here is my perl function for doing this:
sub nsrlink
{
my $tag=shift(@_);
return("") if($tag ne "nsrlink");
my $attributes=shift(@_);
my $text=shift(@_);
my $this=get_current_main_content();
my $url=get_url($this.".html");
my $href=${$attributes}{"href"};
$href=expand($href);
if($url eq $href) { return($text); }
else { return("<a href=\"$href\">".$text."</a>"); }
}
The key problem is with that get_current_main_content() function. According to the documentation
that function is only guarenteed to be valid if called from within a deferred content reference. I'm
about at my wits end trying to get a deferred content reference to then execute some perl code.
My idea was to have the function called by the custom tag <nsrlink> to write out something like:
<{set foo="<{perl nsrlink(\"nsrlink\", { \"href\" => \"index.html\" }, \"dud\");}\>"}> $[foo]
I also tried <wmmeta> instead of <{set}>
Then the evaluation of $[foo] would be deferred, it resolves to a perl block which is then executed.
I can't get this to work. First off, inside the perl block I have quotes. How do I escape them,
since quotes delimit the foo="..." stuff? Also It seems that I can't have the '>' in my perl block
either, as that makes webmake unable to parse. What I have been doing is backslashing all of these
things, but I'm not certian if this is the correct direction to go in.
Right now this works:
<{set dud="<{perl nsrlink("nsrlink", { "href" => "index.htm" }, "dud");}>"}> $[dud]
But I can't get a perl block to output that text.
I hope I am explaining this clearly. I think what I need is when webmake sees this:
<nsrlink href="index.html">dud</nsrlink>
It calls a function which outputs this:
<{set foo="<{perl nsrlink("nsrlink", { "href" => "index.htm" }, "dud");}>"}> $[foo]
And when $[foo] is evaluated get_current_main_content() is valid and nsrlink returns the html that I
want it to return.
Is this even possible? I see that the navtree plugin requires that it be added to the html as a
deferred content reference.
Thanks for your time.
More information about the Webmake-talk
mailing list