diff options
Diffstat (limited to 'bin/lynx')
-rwxr-xr-x | bin/lynx/aa.pl | 7 | ||||
-rwxr-xr-x | bin/lynx/admin.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/am.pl | 4 | ||||
-rwxr-xr-x | bin/lynx/ap.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/ar.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/arap.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/arapprn.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/bp.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/ca.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/cp.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/ct.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/gl.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/hr.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/ic.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/io.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/ir.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/is.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/jc.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/login.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/menu.pl | 174 | ||||
-rwxr-xr-x | bin/lynx/oe.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/pe.pl | 4 | ||||
-rwxr-xr-x | bin/lynx/pos.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/ps.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/pw.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/rc.pl | 3 | ||||
-rwxr-xr-x | bin/lynx/rp.pl | 3 |
27 files changed, 0 insertions, 258 deletions
diff --git a/bin/lynx/aa.pl b/bin/lynx/aa.pl deleted file mode 100755 index ed093b04..00000000 --- a/bin/lynx/aa.pl +++ /dev/null @@ -1,7 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/aa.pl"; - -## Differing routines go here - -1; diff --git a/bin/lynx/admin.pl b/bin/lynx/admin.pl deleted file mode 100755 index 717ea889..00000000 --- a/bin/lynx/admin.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/admin.pl"; diff --git a/bin/lynx/am.pl b/bin/lynx/am.pl deleted file mode 100755 index 3d93f1eb..00000000 --- a/bin/lynx/am.pl +++ /dev/null @@ -1,4 +0,0 @@ -#!/usr/bin/perl - - -require "bin/mozilla/am.pl"; diff --git a/bin/lynx/ap.pl b/bin/lynx/ap.pl deleted file mode 100755 index a9dae7f2..00000000 --- a/bin/lynx/ap.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/ap.pl"; diff --git a/bin/lynx/ar.pl b/bin/lynx/ar.pl deleted file mode 100755 index 562117c9..00000000 --- a/bin/lynx/ar.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/ar.pl"; diff --git a/bin/lynx/arap.pl b/bin/lynx/arap.pl deleted file mode 100755 index a3d4feed..00000000 --- a/bin/lynx/arap.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/arap.pl"; diff --git a/bin/lynx/arapprn.pl b/bin/lynx/arapprn.pl deleted file mode 100755 index 0b923c35..00000000 --- a/bin/lynx/arapprn.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/arapprn.pl"; diff --git a/bin/lynx/bp.pl b/bin/lynx/bp.pl deleted file mode 100755 index fd88560b..00000000 --- a/bin/lynx/bp.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/bp.pl"; diff --git a/bin/lynx/ca.pl b/bin/lynx/ca.pl deleted file mode 100755 index 152211ea..00000000 --- a/bin/lynx/ca.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/ca.pl"; diff --git a/bin/lynx/cp.pl b/bin/lynx/cp.pl deleted file mode 100755 index 77999967..00000000 --- a/bin/lynx/cp.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/cp.pl"; diff --git a/bin/lynx/ct.pl b/bin/lynx/ct.pl deleted file mode 100755 index e2063d80..00000000 --- a/bin/lynx/ct.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/ct.pl" diff --git a/bin/lynx/gl.pl b/bin/lynx/gl.pl deleted file mode 100755 index 3e95b48d..00000000 --- a/bin/lynx/gl.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/bin/perl - -require "bin/mozilla/gl.pl"; diff --git a/bin/lynx/hr.pl b/bin/lynx/hr.pl deleted file mode 100755 index 124365b0..00000000 --- a/bin/lynx/hr.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/hr.pl"; diff --git a/bin/lynx/ic.pl b/bin/lynx/ic.pl deleted file mode 100755 index 635b9ab9..00000000 --- a/bin/lynx/ic.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/ic.pl"; diff --git a/bin/lynx/io.pl b/bin/lynx/io.pl deleted file mode 100755 index 9ff32366..00000000 --- a/bin/lynx/io.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/io.pl"; diff --git a/bin/lynx/ir.pl b/bin/lynx/ir.pl deleted file mode 100755 index f2195c7d..00000000 --- a/bin/lynx/ir.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/ir.pl"; diff --git a/bin/lynx/is.pl b/bin/lynx/is.pl deleted file mode 100755 index d5717587..00000000 --- a/bin/lynx/is.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/is.pl"; diff --git a/bin/lynx/jc.pl b/bin/lynx/jc.pl deleted file mode 100755 index c40eab2d..00000000 --- a/bin/lynx/jc.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/jc.pl"; diff --git a/bin/lynx/login.pl b/bin/lynx/login.pl deleted file mode 100755 index 9ac6417d..00000000 --- a/bin/lynx/login.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/login.pl"; diff --git a/bin/lynx/menu.pl b/bin/lynx/menu.pl deleted file mode 100755 index 7699f3a0..00000000 --- a/bin/lynx/menu.pl +++ /dev/null @@ -1,174 +0,0 @@ -###################################################################### -# LedgerSMB Small Medium Business Accounting -# http://www.ledgersmb.org/ -# -# Copyright (C) 2006 -# This work contains copyrighted information from a number of sources all used -# with permission. -# -# This file contains source code included with or based on SQL-Ledger which -# is Copyright Dieter Simader and DWS Systems Inc. 2000-2005 and licensed -# under the GNU General Public License version 2 or, at your option, any later -# version. For a full list including contact information of contributors, -# maintainers, and copyright holders, see the CONTRIBUTORS file. -# -# Original Copyright Notice from SQL-Ledger 2.6.17 (before the fork): -# Copyright (c) 2000 -# -# Author: Dieter Simader -# Email: dsimader@sql-ledger.org -# Web: http://www.sql-ledger.org -# -# Contributors: Christopher Browne <cbrowne@acm.org> -# Tony Fraser <tony@sybaspace.com> -# -# -# Portions Copyright (c) 2000 -# -# Author: Dieter Simader -# Email: dsimader@sql-ledger.org -# Web: http://www.sql-ledger.org -# -# -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2 of the License, or -# (at your option) any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# You should have received a copy of the GNU General Public License -# along with this program; if not, write to the Free Software -# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. -####################################################################### -# -# menu for text based browsers (lynx) -# -####################################################################### - -$menufile = "menu.ini"; -use LedgerSMB::Menu; - - -1; -# end of main - - - -sub display { - - $menu = new Menu "$menufile"; - $menu->add_file("custom_$menufile") if -f "custom_$menufile"; - $menu->add_file("$form->{login}_$menufile") if -f "$form->{login}_$menufile"; - - @menuorder = $menu->access_control(\%myconfig); - - $form->{title} = "LedgerSMB $form->{version}"; - - $form->header(1); - - $offset = int (21 - $#menuorder)/2; - - print "<pre>"; - print "\n" x $offset; - print "</pre>"; - - print qq|<center><table>|; - - map { print "<tr><td>".$menu->menuitem(\%myconfig, \%$form, $_).$locale->text($_).qq|</a></td></tr>|; } @menuorder; - - print qq' -</table> - -</body> -</html> -'; - -} - - -sub section_menu { - - $menu = new Menu "$menufile", $form->{level}; - - $menu->add_file("custom_$menufile") if -f "custom_$menufile"; - $menu->add_file("$form->{login}_$menufile") if -f "$form->{login}_$menufile"; - - # build tiered menus - @menuorder = $menu->access_control(\%myconfig, $form->{level}); - - foreach $item (@menuorder) { - $a = $item; - $item =~ s/^$form->{level}--//; - push @neworder, $a unless ($item =~ /--/); - } - @menuorder = @neworder; - - $level = $form->{level}; - $level =~ s/--/ /g; - - $form->{title} = $locale->text($level); - - $form->header; - - $offset = int (21 - $#menuorder)/2; - print "<pre>"; - print "\n" x $offset; - print "</pre>"; - - print qq|<center><table>|; - - foreach $item (@menuorder) { - $label = $item; - $label =~ s/$form->{level}--//g; - - # remove target - $menu->{$item}{target} = ""; - - print "<tr><td>".$menu->menuitem(\%myconfig, \%$form, $item, $form->{level}).$locale->text($label)."</a></td></tr>"; - } - - print qq'</table> - -</body> -</html> -'; - -} - - -sub acc_menu { - - §ion_menu; - -} - - -sub menubar { - $menu = new Menu "$menufile", ""; - - # build menubar - @menuorder = $menu->access_control(\%myconfig, ""); - - @neworder = (); - map { push @neworder, $_ unless ($_ =~ /--/) } @menuorder; - @menuorder = @neworder; - - print "<p>"; - $form->{script} = "menu.pl"; - - print "| "; - foreach $item (@menuorder) { - $label = $item; - - # remove target - $menu->{$item}{target} = ""; - - print $menu->menuitem(\%myconfig, \%$form, $item, "").$locale->text($label)."</a> | "; - } - -} - - diff --git a/bin/lynx/oe.pl b/bin/lynx/oe.pl deleted file mode 100755 index 97f5006c..00000000 --- a/bin/lynx/oe.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/oe.pl"; diff --git a/bin/lynx/pe.pl b/bin/lynx/pe.pl deleted file mode 100755 index f461e19e..00000000 --- a/bin/lynx/pe.pl +++ /dev/null @@ -1,4 +0,0 @@ -#!/usr/bin/perl - - -require "bin/mozilla/pe.pl"; diff --git a/bin/lynx/pos.pl b/bin/lynx/pos.pl deleted file mode 100755 index 09688320..00000000 --- a/bin/lynx/pos.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bim/mozilla/pos.pl"; diff --git a/bin/lynx/ps.pl b/bin/lynx/ps.pl deleted file mode 100755 index 411cb0b0..00000000 --- a/bin/lynx/ps.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/ps.pl"; diff --git a/bin/lynx/pw.pl b/bin/lynx/pw.pl deleted file mode 100755 index 0ce64df3..00000000 --- a/bin/lynx/pw.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/pw.pl"; diff --git a/bin/lynx/rc.pl b/bin/lynx/rc.pl deleted file mode 100755 index 2d272b46..00000000 --- a/bin/lynx/rc.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/rc.pl"; diff --git a/bin/lynx/rp.pl b/bin/lynx/rp.pl deleted file mode 100755 index 2903f65c..00000000 --- a/bin/lynx/rp.pl +++ /dev/null @@ -1,3 +0,0 @@ -#!/usr/bin/perl - -require "bin/mozilla/rp.pl"; |