aboutsummaryrefslogtreecommitdiffstats
path: root/sbin/convertsession
diff options
context:
space:
mode:
Diffstat (limited to 'sbin/convertsession')
-rw-r--r--sbin/convertsession31
1 files changed, 0 insertions, 31 deletions
diff --git a/sbin/convertsession b/sbin/convertsession
deleted file mode 100644
index 794ef07..0000000
--- a/sbin/convertsession
+++ /dev/null
@@ -1,31 +0,0 @@
-#!/usr/bin/perl
-# -*- Mode: cperl -*-
-# Copyright (C) 2000 by Chmouel Boudjnah <chmouel@mandrakesoft.com>
-# Redistribution of this file is permitted under the terms of the GNU
-# Public License (GPL)
-## description: Convert a file /etc/X11/window-managers to a
-## /etc/X11/wmsession.d/ style files.
-
-my $dir = '/etc/X11/wmsession.d/';
-
-if ($ARGV[0] =~ /-f/ ) {
- $file = $ARGV[1];
-} else {
- $file = '/etc/X11/window-managers';
-}
-
-my $cnt = 0;
-
-open F, $file or die "Can't open $file\n";
-while (<F>) {
- $/ = "--@@--";
- s|--@@--||g;
- if ($cnt != 0) {
- $content = "$_";
- $n = $1 if /^NAME=(.*)/m;
- open C, ">$dir/$cnt$n" or die "Can't open $dir/$cnt$n\n";
- print C $content;
- close C;
- }
- $cnt++;
-}