* John E. Davis is quoted & my replies are inline below :
> On 6 Sep 2007 06:02:50 GMT, Blinky the Shark < @ > wrote:
>> /stuff/comp/
>
> What version of slang are you using? If you are using version 1,
> you will need to replace lines such as
>
> throw InvalidParmError, "foo";
>
> with
>
> error ("foo");
>
> try/catch/throw/finally semantics were not added until version 2.
#v+
% You need 'whois' and 'less' for this macro to work. Future version will
% hopefully check they exist already or possibly provide alternatives.
define whois_postinghost () {
variable status= is_article_visible ();
if ( status & 1) {
variable postinghost= extract_article_header ( "NNTP-Posting-Host");
variable ph_exists= strlen ( postinghost);
if ( ph_exists > 0) {
() = system ( "whois "+postinghost+" | less");
} else {
error ("This article doesn't contain a NNTP-Posting-Host header");
}
} else {
error ("You need to display the article to check");
}
}
definekey ( "whois_postinghost", "\eH", "article");
#v-
--
Troy Piggins | /~troy
** NEW MACRO 5/9/07 ** ___ | __ __ ,-O (o- O
slrn macros and howto: |___ | |/ |/ | O ) //\ O
/~troy/slrn ___| | | | | `-O V_/_ OOO