summaryrefslogtreecommitdiff
path: root/perllib/sdf/home/stdlib/usecases.sdm
diff options
context:
space:
mode:
authorColin Watson <cjwatson@debian.org>2023-08-02 00:40:04 +0100
committerColin Watson <cjwatson@debian.org>2023-08-02 00:40:04 +0100
commita37cf289ab455e83661aaa83196cb58cd0082665 (patch)
tree741af518b44d266f0c55635c86309fe45aaadcd6 /perllib/sdf/home/stdlib/usecases.sdm
parent96891a072b0cf527942af6a0f401e3a8571a6b19 (diff)
Use modern Perl package separators
Bug-Debian: https://bugs.debian.org/1042846 Forwarded: no Last-Update: 2023-08-02 Patch-Name: 008_modern_package_separators.diff
Diffstat (limited to 'perllib/sdf/home/stdlib/usecases.sdm')
-rw-r--r--perllib/sdf/home/stdlib/usecases.sdm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/sdf/home/stdlib/usecases.sdm b/perllib/sdf/home/stdlib/usecases.sdm
index dd4e7fe..955dbbe 100644
--- a/perllib/sdf/home/stdlib/usecases.sdm
+++ b/perllib/sdf/home/stdlib/usecases.sdm
@@ -76,7 +76,7 @@ sub uc_title_Macro {
$title = $db_title;
}
elsif ($title ne $db_title) {
- &'AppMsg("warning", "usecase title does not match database value");
+ &::AppMsg("warning", "usecase title does not match database value");
}
# Build result