Post by George on Jul 5, 2013 9:43:10 GMT -5
It appears we've mucked up the ONLY sample macro, both in the Help file and in the sample \MACROS folder. 
Ouch!!
Please replace the ONLY.MACRO with the following corrected code.
George
Ouch!!Please replace the ONLY.MACRO with the following corrected code.
George
' ONLY.MACRO
'
' This is the ONLY macro described in the Help under the
' "Macros for fun and profit" topic.
'
if Get_Arg$(0) <> "" then
SPF_Cmd("NEXCLUDE ALL " + SPF_Quote$(Get_Arg$(1)) + " " + Get_Arg$(2,0))
else
if Get_Curr_Word$ <> "" then
SPF_Cmd("NEXCLUDE ALL " + SPF_Quote$(Get_Curr_Word$))
else
Set_Msg(FAIL, "There is no word under the cursor")
end if
end if
