63 lines
2.7 KiB
Diff
63 lines
2.7 KiB
Diff
diff -rup gtkada-3.8.2-src-org/testgtk/create_css_editor.adb gtkada-3.8.2-src/testgtk/create_css_editor.adb
|
|
--- gtkada-3.8.2-src-org/testgtk/create_css_editor.adb 2014-01-06 18:22:20.000000000 +0800
|
|
+++ gtkada-3.8.2-src/testgtk/create_css_editor.adb 2015-11-06 11:13:16.881265500 +0800
|
|
@@ -38,28 +38,28 @@ package body Create_Css_Editor is
|
|
|
|
CSS : constant String :=
|
|
"/* You can edit the text in this window to change the" & ASCII.LF
|
|
- &" * appearance of this Window." & ASCII.LF
|
|
- &" * Be careful, if you screw it up, nothing might be visible" & ASCII.LF
|
|
- &" * anymore. :)" & ASCII.LF
|
|
- &" */" & ASCII.LF & ASCII.LF
|
|
+ & " * appearance of this Window." & ASCII.LF
|
|
+ & " * Be careful, if you screw it up, nothing might be visible" & ASCII.LF
|
|
+ & " * anymore. :)" & ASCII.LF
|
|
+ & " */" & ASCII.LF & ASCII.LF
|
|
|
|
- &"/* This CSS resets all properties to their defaults values" & ASCII.LF
|
|
- &" * and overrides all user settings and the theme in use */" & ASCII.LF
|
|
+ & "/* This CSS resets all properties to their defaults values" & ASCII.LF
|
|
+ & " * and overrides all user settings and the theme in use */" & ASCII.LF
|
|
& ASCII.LF
|
|
|
|
- &"/* Set a very futuristic style by default */" & ASCII.LF & ASCII.LF
|
|
+ & "/* Set a very futuristic style by default */" & ASCII.LF & ASCII.LF
|
|
|
|
- &"* {" & ASCII.LF
|
|
- &" color: green;" & ASCII.LF
|
|
- &" font-family: Monospace;" & ASCII.LF
|
|
- &" border: 1px solid;" & ASCII.LF
|
|
- &"}" & ASCII.LF
|
|
-
|
|
- &"/* Make sure selections are visible */" & ASCII.LF
|
|
- &":selected {" & ASCII.LF
|
|
- &" background-color: darkGreen;" & ASCII.LF
|
|
- &" color: black;" & ASCII.LF
|
|
- &"}";
|
|
+ & "* {" & ASCII.LF
|
|
+ & " color: green;" & ASCII.LF
|
|
+ & " font-family: Monospace;" & ASCII.LF
|
|
+ & " border: 1px solid;" & ASCII.LF
|
|
+ & "}" & ASCII.LF
|
|
+
|
|
+ & "/* Make sure selections are visible */" & ASCII.LF
|
|
+ & ":selected {" & ASCII.LF
|
|
+ & " background-color: darkGreen;" & ASCII.LF
|
|
+ & " color: black;" & ASCII.LF
|
|
+ & "}";
|
|
|
|
Last_Working_Css : Unbounded_String := To_Unbounded_String (CSS);
|
|
Error : aliased Glib.Error.GError;
|
|
diff -rup gtkada-3.8.2-src-org/testgtk/create_print.adb gtkada-3.8.2-src/testgtk/create_print.adb
|
|
--- gtkada-3.8.2-src-org/testgtk/create_print.adb 2014-01-06 18:22:20.000000000 +0800
|
|
+++ gtkada-3.8.2-src/testgtk/create_print.adb 2015-11-06 11:20:56.435618300 +0800
|
|
@@ -127,7 +127,7 @@ package body Create_Print is
|
|
Close_Path (Cr);
|
|
|
|
Set_Source_Rgb (Cr, 0.0, 0.0, 0.0);
|
|
- Set_Line_Width (Cr, 1.0/16.0);
|
|
+ Set_Line_Width (Cr, 1.0 / 16.0);
|
|
Set_Line_Cap (Cr, Cairo_Line_Cap_Round);
|
|
Set_Line_Join (Cr, Cairo_Line_Join_Round);
|
|
Cairo.Stroke (Cr);
|