From bb6492c6085f10570ae5087b667aaaa1e8fa3d01 Mon Sep 17 00:00:00 2001
From: Jamie Mansfield <malgm@lapis.blue>
Date: Sat, 7 Mar 2015 19:10:16 +0000
Subject: Make .gitignore work. Fixes #15

Thanks to @kenzierocks and http://stackoverflow.com/questions/19663093/apply-gitignore-on-an-existing-repository-already-tracking-large-number-of-files
---
 Backup/windows 95/windows explorer.vb | 45 -----------------------------------
 1 file changed, 45 deletions(-)
 delete mode 100755 Backup/windows 95/windows explorer.vb

(limited to 'Backup/windows 95/windows explorer.vb')

diff --git a/Backup/windows 95/windows explorer.vb b/Backup/windows 95/windows explorer.vb
deleted file mode 100755
index 08cde17..0000000
--- a/Backup/windows 95/windows explorer.vb	
+++ /dev/null
@@ -1,45 +0,0 @@
-Public Class windows_explorer
-
-
-
-    Private Sub programtopbar_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles programtopbar.MouseDown
-        If e.Button = MouseButtons.Left Then
-            programtopbar.Capture = False
-            Const WM_NCLBUTTONDOWN As Integer = &HA1S
-            Const HTCAPTION As Integer = 2
-            Dim msg As Message = _
-                Message.Create(Me.Handle, WM_NCLBUTTONDOWN, _
-                    New IntPtr(HTCAPTION), IntPtr.Zero)
-            Me.DefWndProc(msg)
-        End If
-    End Sub
-
-    Private Sub closebutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles closebutton.Click
-        Me.Close()
-    End Sub
-
-    Private Sub TreeView1_AfterSelect(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterSelect
-        ListView1.Items.Clear()
-        Dim childamount As TreeNodeCollection
-        childamount = TreeView1.SelectedNode.Nodes
-        lblamountofobjects.Text = (childamount.Count & " objects(s)")
-        For Each TreeNode In TreeView1.SelectedNode.Nodes
-            If TreeNode.tag = "file" Then
-                TreeNode.forecolor = TreeView1.BackColor
-            End If
-            ListView1.Items.Add(TreeNode.text)
-        Next
-
-    End Sub
-
-    Private Sub windows_explorer_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
-        lblamountofobjects.Text = "0 objects"
-        look.Start()
-    End Sub
-
-    Private Sub look_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles look.Tick
-        Me.programtopbar.BackColor = Windows95.exampleprogramtopbar.BackColor
-        Me.programtopbar.BackgroundImage = Windows95.exampleprogramtopbar.BackgroundImage
-        Me.programname.BackColor = Windows95.exampleprogramtext.BackColor
-    End Sub
-End Class
\ No newline at end of file
-- 
cgit v1.2.3