From 1115ca269e37b08483cc635ed329351edf9be713 Mon Sep 17 00:00:00 2001 From: FellippeHeitor Date: Tue, 19 Jan 2021 00:24:06 -0300 Subject: [PATCH] Dead code removal. --- source/ide/ide_global.bas | 1 - source/ide/ide_methods.bas | 12 ------------ 2 files changed, 13 deletions(-) diff --git a/source/ide/ide_global.bas b/source/ide/ide_global.bas index 204a7e1e4..cc636937d 100644 --- a/source/ide/ide_global.bas +++ b/source/ide/ide_global.bas @@ -135,7 +135,6 @@ DIM SHARED ideroot AS STRING DIM SHARED idetxt(1000) AS STRING DIM SHARED idetxtlast AS INTEGER DIM SHARED idehl -DIM SHARED idealtcode(255) AS INTEGER DIM SHARED ideprogname AS STRING DIM SHARED idepath AS STRING DIM SHARED idefindtext AS STRING diff --git a/source/ide/ide_methods.bas b/source/ide/ide_methods.bas index db5957944..697ecc281 100644 --- a/source/ide/ide_methods.bas +++ b/source/ide/ide_methods.bas @@ -405,9 +405,6 @@ FUNCTION ide2 (ignore) idepathsep$ = "/" END IF - initmouse - a$ = "QWERTYUIOP????ASDFGHJKL?????ZXCVBNM": x = 16: FOR i = 1 TO LEN(a$): idealtcode(ASC(MID$(a$, i, 1))) = x: x = x + 1: NEXT - ideroot$ = idezgetroot$ idepath$ = _STARTDIR$ @@ -10449,15 +10446,6 @@ FUNCTION idezgetfilepath$ (root$, f$) idezgetfilepath$ = p$ END FUNCTION -SUB initmouse - _MOUSESHOW -END SUB - - - - - - FUNCTION idelayoutbox '-------- generic dialog box header --------