From d52abbde28e4737538a15f906725f268d5fb4857 Mon Sep 17 00:00:00 2001
From: Wolfgang Bumiller <w.bumiller@proxmox.com>
Date: Tue, 25 Jul 2023 13:41:47 +0200
Subject: [PATCH] test 'boot' attribute

Signed-off-by: Wolfgang Bumiller <w.bumiller@proxmox.com>
---
 perlmod-test/src/pkg142.rs | 11 ++++++++++-
 test.pl.expected           |  1 +
 2 files changed, 11 insertions(+), 1 deletion(-)

diff --git a/perlmod-test/src/pkg142.rs b/perlmod-test/src/pkg142.rs
index 28d33e4..eaa3ea3 100644
--- a/perlmod-test/src/pkg142.rs
+++ b/perlmod-test/src/pkg142.rs
@@ -21,7 +21,12 @@ enum AnEnum {
     ResultB,
 }
 
-#[perlmod::package(name = "RSPM::Foo142", lib = "perlmod_test", write = true)]
+#[perlmod::package(
+    name = "RSPM::Foo142",
+    lib = "perlmod_test",
+    write = true,
+    boot = "loaded"
+)]
 mod export {
     use anyhow::{bail, Error};
 
@@ -29,6 +34,10 @@ mod export {
 
     use super::AnEnum;
 
+    fn loaded() {
+        println!("<loaded>");
+    }
+
     #[export]
     fn foo142(a: u32, b: u32) -> Result<u32, Error> {
         if a == 42 {
diff --git a/test.pl.expected b/test.pl.expected
index 9d77383..8dce245 100644
--- a/test.pl.expected
+++ b/test.pl.expected
@@ -1,3 +1,4 @@
+<loaded>
 Called something on Bless { "Hello" }!
 Called something_nonraw on Bless { "Hello" }!
 Got (17, 32, )