1 |
slords |
1.1 |
--- /dev/null 2007-12-12 21:10:11.000000000 +0100 |
2 |
|
|
+++ smeserver-phpmyadmin-multiuser-2.11.3/createlinks 2008-05-15 20:18:45.000000000 +0200 |
3 |
|
|
@@ -1,51 +0,0 @@ |
4 |
|
|
-#!/usr/bin/perl -w |
5 |
|
|
-# This script creates the symlinks needed by this RPM |
6 |
|
|
-# Specific support exists to create symlinks within e-smith web "panels" |
7 |
|
|
-# and for links from named "events" directories into the "actions" directory |
8 |
|
|
- |
9 |
|
|
-sub panel_link |
10 |
|
|
-{ |
11 |
|
|
- my ($function, $panel) = @_; |
12 |
|
|
- |
13 |
|
|
- unlink "root/etc/e-smith/web/panels/$panel/cgi-bin/$function"; |
14 |
|
|
- symlink("../../../functions/$function", |
15 |
|
|
- "root/etc/e-smith/web/panels/$panel/cgi-bin/$function") |
16 |
|
|
- or die "Can't symlink to root/etc/e-smith/web/panels/$panel". |
17 |
|
|
- "/cgi-bin/$function: $!"; |
18 |
|
|
-} |
19 |
|
|
- |
20 |
|
|
-sub event_link |
21 |
|
|
-{ |
22 |
|
|
- my ($action, $event, $level) = @_; |
23 |
|
|
- |
24 |
|
|
- unlink "root/etc/e-smith/events/${event}/S${level}${action}"; |
25 |
|
|
- symlink("../actions/${action}", |
26 |
|
|
- "root/etc/e-smith/events/${event}/S${level}${action}") |
27 |
|
|
- or die "Can't symlink to " . |
28 |
|
|
- "root/etc/e-smith/events/${event}/S${level}${action}: $!"; |
29 |
|
|
-} |
30 |
|
|
- |
31 |
|
|
-#-------------------------------------------------- |
32 |
|
|
-# functions for manager panel |
33 |
|
|
-#-------------------------------------------------- |
34 |
|
|
-my $panel = "manager"; |
35 |
|
|
- |
36 |
|
|
-#panel_link("function1", $panel); |
37 |
|
|
-#panel_link("function2", $panel); |
38 |
|
|
- |
39 |
|
|
-#-------------------------------------------------- |
40 |
|
|
-# actions for console-save event: |
41 |
|
|
-#-------------------------------------------------- |
42 |
|
|
-$event = "console-save"; |
43 |
|
|
- |
44 |
|
|
-#event_link("action1", $event, "55"); |
45 |
|
|
-#event_link("action2", $event, "60"); |
46 |
|
|
- |
47 |
|
|
-#-------------------------------------------------- |
48 |
|
|
-# actions for domain-create event: |
49 |
|
|
-#-------------------------------------------------- |
50 |
|
|
-$event = "domain-create"; |
51 |
|
|
- |
52 |
|
|
-#event_link("action1", $event, "55"); |
53 |
|
|
-#event_link("action2", $event, "90"); |
54 |
|
|
- |