initial commit of file from CVS for smeserver-qmHandle on Sat Sep 7 20:58:19 AEST 2024

createlinks

@@ -0,0 +1,33 @@
+#!/usr/bin/perl -w
+# This script creates the symlinks needed by this RPM
+# Specific support exists to create symlinks within e-smith web "panels"
+# and for links from named "events" directories into the "actions" directory
+use esmith::Build::CreateLinks  qw(:all);
+
+
+#--------------------------------------------------
+# functions for manager panel
+#--------------------------------------------------
+my $panel = "manager";
+
+panel_link("qmh", $panel);
+
+#--------------------------------------------------
+# actions for console-save event:
+#--------------------------------------------------
+
+#--------------------------------------------------
+# actions for smeserver-qmHandle-update event:
+#--------------------------------------------------
+
+my $event = 'smeserver-qmHandle-update';
+
+safe_symlink('restart', "root/etc/e-smith/events/$event/services2adjust/smanager");
+
+event_link('navigation2-conf', "$event", '80');
+event_link('routes2-conf', "$event", '80');
+event_link('locales2-conf', "$event", '80');
+
+#--------------------------------------------------
+# The End
+#--------------------------------------------------