On 15 Nov 2024, Dennis Slagers said the following...

 DS>   my $err =
 DS> putMsgInArea($area,$myname,$fromname,$myaddr,$fromaddr,"$pngsub:
 DS> ".$subject,"","Uns Cra Dir Imm Loc Pvt K/s",$msgtext,3);

Adding a "FLAGS DIR IMM" kludge *seems* to work for me here, but I'm only testing with a point, so more testing would be required:

e.g:

# Prepend kludge lines
$msgtext = "\x01MSGID: $myaddr $mid\r\x01TZUTC: $tz\r\x01FLAGS DIR IMM\r".$msgtext;

If I check the message in golded before it's pack the attributes are:
Uns Imm Dir Pvt Loc

From hpt.log:

Before:
7 07:59:05  Msg packed with flavour 'hold': 1:229/664 -> 1:229/664.1

After:
7 08:85:42  Msg packed with flavour 'immediate': 1:229/664 -> 1:229/664.1


Jay

... Canada is eh okay

--- Mystic BBS v1.12 A49 2024/05/29 (Linux/64)