Enlightenment CVS committal

Author  : rbdpngn
Project : e17
Module  : libs/ewl

Dir     : e17/libs/ewl/test


Modified Files:
        ewl_textarea_test.c 


Log Message:
Test the append function for the textarea, and the color manipulation
functions.

===================================================================
RCS file: /cvsroot/enlightenment/e17/libs/ewl/test/ewl_textarea_test.c,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -3 -r1.17 -r1.18
--- ewl_textarea_test.c 13 May 2004 06:03:01 -0000      1.17
+++ ewl_textarea_test.c 27 Jun 2004 18:06:17 -0000      1.18
@@ -6,7 +6,7 @@
        "the new text area.\n"
        "It's possible that it contains\n"
        "unprintable characters such\n"
-       "as  or extremely long\n"
+       "as \t or extremely long\n"
        "lines. Beware, it may\n"
        "trigger bugs in etox or\n"
        "ewl\nso\ntrace\ncarefully. Now it's time for some "
@@ -24,29 +24,7 @@
        "when displaying large text regions. This message will "
        "now be repeated to do a little stress testing.\n"
        "\n"
-       "\n"
-       "This is a long string to test\n"
-       "the effectiveness of\n"
-       "the new text area.\n"
-       "It's possible that it contains\n"
-       "unprintable characters such\n"
-       "as  or extremely long\n"
-       "lines. Beware, it may\n"
-       "trigger bugs in etox or\n"
-       "ewl\nso\ntrace\ncarefully. Now it's time for some "
-       "gibberish to make this thing longer and to test the "
-       "scrollbars. There's probably not enough text here\n"
-       "to really push etox, but hopefully it will give a "
-       "better idea of the speed\n"
-       "Right now selection of text and click to position\n"
-       "need quite a bit of work, as well as keyboard\n"
-       "navigation and focus control\n"
-       "We really need to get some better text in here at\n"
-       "some point, since this is pretty lame\n"
-       "but we need long strings to test it effectively.\n"
-       "I have heard a couple reports of major slowdowns\n"
-       "when displaying large text regions. This message will "
-       "now be repeated to do a little stress testing.";
+       "\n";
 
 static Ewl_Widget *textarea_button;
 
@@ -80,7 +58,7 @@
        ewl_window_set_name(EWL_WINDOW(textarea_win), "EWL Test Application");
        ewl_window_set_class(EWL_WINDOW(textarea_win), "EFL Test Application");
        ewl_object_set_fill_policy(EWL_OBJECT(textarea_win), EWL_FLAG_FILL_ALL);
-       ewl_object_request_size(EWL_OBJECT(textarea_win), 100, 100);
+       ewl_object_request_size(EWL_OBJECT(textarea_win), 200, 150);
        ewl_callback_append(textarea_win, EWL_CALLBACK_DELETE_WINDOW,
                            __destroy_textarea_test_window, NULL);
        ewl_widget_show(textarea_win);
@@ -96,6 +74,12 @@
         * Create the textarea to be displayed.
         */
        textarea = ewl_text_new(long_text);
+       ewl_text_color_set(EWL_TEXT(textarea), 255, 0, 0, 255);
+       ewl_text_text_append(EWL_TEXT(textarea), long_text);
+       ewl_text_color_set(EWL_TEXT(textarea), 0, 255, 0, 255);
+       ewl_text_text_append(EWL_TEXT(textarea), long_text);
+       ewl_text_color_set(EWL_TEXT(textarea), 0, 0, 255, 255);
+       ewl_text_text_append(EWL_TEXT(textarea), long_text);
        ewl_container_append_child(EWL_CONTAINER(scrollpane), textarea);
        ewl_widget_show(textarea);
 




-------------------------------------------------------
This SF.Net email sponsored by Black Hat Briefings & Training.
Attend Black Hat Briefings & Training, Las Vegas July 24-29 - 
digital self defense, top technical experts, no vendor pitches, 
unmatched networking opportunities. Visit www.blackhat.com
_______________________________________________
enlightenment-cvs mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/enlightenment-cvs

Reply via email to