2 files changed, 22 insertions, 2 deletions
diff --git a/src/os-plugins/plugins/desktop/OpenSLX/Distro/Base.pm b/src/os-plugins/plugins/desktop/OpenSLX/Distro/Base.pm
index 316448bb..d073704e 100644
--- a/src/os-plugins/plugins/desktop/OpenSLX/Distro/Base.pm
+++ b/src/os-plugins/plugins/desktop/OpenSLX/Distro/Base.pm
@@ -113,6 +113,20 @@ sub GDMPathInfo
     return $pathInfo;
 }
 
+sub setupICEauthProfileScript
+{
+    my $self = shift;
+    my $script = unshiftHereDoc(<<"    End-of-Here");
+        # written by OpenSLX-plugin 'desktop'
+        mkdir "/tmp/.ICE-\${USER}"
+        chmod 600 "/tmp/.ICE-\${USER}"
+        export ICEAUTHORITY="/tmp/.ICE-\${USER}/.ICEauthority"
+
+    End-of-Here
+    
+    return $script;
+}
+
 sub setupGDMScript
 {
     my $self     = shift;
diff --git a/src/os-plugins/plugins/desktop/OpenSLX/OSPlugin/desktop.pm b/src/os-plugins/plugins/desktop/OpenSLX/OSPlugin/desktop.pm
index 7d496483..2f04e124 100644
--- a/src/os-plugins/plugins/desktop/OpenSLX/OSPlugin/desktop.pm
+++ b/src/os-plugins/plugins/desktop/OpenSLX/OSPlugin/desktop.pm
@@ -566,10 +566,13 @@ sub _setupGDMScript
     my $self = shift;
     
     my $repoPath = $self->{pluginRepositoryPath};
-    my $script = $self->{distro}->setupGDMScript($repoPath);
 
+    my $script = $self->{distro}->setupGDMScript($repoPath);
     spitFile("$repoPath/gdm/desktop.sh", $script);
 
+    my $profileScript = $self->{distro}->setupICEauthProfileScript();
+    spitFile("$repoPath/fixICEauth.sh", $profileScript);
+
     return;
 }
 
@@ -603,10 +606,13 @@ sub _setupKDMScript
     my $self = shift;
     
     my $repoPath = $self->{pluginRepositoryPath};
-    my $script = $self->{distro}->setupKDMScript($repoPath);
 
+    my $script = $self->{distro}->setupKDMScript($repoPath);
     spitFile("$repoPath/kdm/desktop.sh", $script);
 
+    my $profileScript = $self->{distro}->setupICEauthProfileScript();
+    spitFile("$repoPath/fixICEauth.sh", $profileScript);
+
     return;
 }