Mercurial Mercurial > hg > stx-libview / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
missing cursors
authorClaus Gittinger <cg@exept.de>
Fri, 10 Dec 1999 15:46:39 +0100
changeset 3111 669af85a5998
parent 3110 0058dbbb19df
child 3112 94968bec00b0
missing cursors
Cursor.st file | annotate | diff | comparison | revisions 
--- a/Cursor.st	Fri Dec 10 15:17:52 1999 +0100
+++ b/Cursor.st	Fri Dec 10 15:46:39 1999 +0100
@@ -930,6 +930,87 @@
     offset: 0@0).
     NormalCursor setShape:#upLeftArrow.
 
+    UpDownArrowCursor :=   
+            (Cursor
+                 extent: 16@16
+                 sourceArray: #(
+            2r0000001100000000
+            2r0000001100000000
+            2r0000001100000000
+            2r0001111111100000
+            2r0000111111000000
+            2r0000011110000000
+            2r0000001100000000
+            2r0111111111111110
+            2r0111111111111110
+            2r0000001100000000
+            2r0000011110000000
+            2r0000111111000000
+            2r0001111111100000
+            2r0000001100000000
+            2r0000001100000000
+            2r0000001100000000)
+                 maskArray: #(
+            2r0000011110000000
+            2r0000011110000000
+            2r0011111111110000
+            2r0011111111110000
+            2r0001111111100000
+            2r0000111111000000
+            2r1111111111111111
+            2r0111111111111110
+            2r0111111111111110
+            2r0000011110000000
+            2r0000111111000000
+            2r0001111111100000
+            2r0011111111110000
+            2r0011111111110000
+            2r0000011110000000
+            2r0000011110000000)
+                    offset: -7@ -7).
+    UpDownArrowCursor setShape:#upDownArrow.
+
+    LeftRightArrowCursor :=   
+            (Cursor
+                 extent: 16@16
+                 sourceArray: #(
+            2r0000000110000000
+            2r0000000110000000
+            2r0000000110000000
+            2r0000000110000000
+            2r0001000110001000
+            2r0001100110011000
+            2r0001110110111000
+            2r1111111111111111
+            2r1111111111111111
+            2r0001110110111000
+            2r0001100110011000
+            2r0001000110001000
+            2r0000000110000000
+            2r0000000110000000
+            2r0000000110000000
+            2r0000000110000000)
+                 maskArray: #(
+            2r0000001111000000
+            2r0000001111000000
+            2r0000001111000000
+            2r0000001111011000
+            2r0011101111011100
+            2r0011111111111100
+            2r1111111111111111
+            2r1111111111111111
+            2r1111111111111111
+            2r1111111111111111
+            2r0011111111111100
+            2r0011101111011100
+            2r0011001111001100
+            2r0000001111000000
+            2r0000001111000000
+            2r0000001111000000)
+                    offset: -7@ -7).
+    LeftRightArrowCursor setShape:#leftRightArrow.
+
+
     CrossHairCursor :=   
             (Cursor
                  extent: 16@16
@@ -3166,6 +3247,6 @@
 !Cursor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Cursor.st,v 1.84 1999-12-09 11:15:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Cursor.st,v 1.85 1999-12-10 14:46:39 cg Exp $'
 ! !
 Cursor initialize!
hg/stx-libview