[gtk] Adwaita: Fix entry block cursors

[Matthias Clasen <matthiasc src gnome org>]

commit 63fd97749c4384a172f8cdc1aa73e64fbff43a41
Author: Matthias Clasen <mclasen redhat com>
Date:   Sun Jul 21 09:50:41 2019 -0700

    Adwaita: Fix entry block cursors

 gtk/theme/Adwaita/_common.scss  | 4 ++++
 gtk/theme/Adwaita/_drawing.scss | 6 +++++-
 2 files changed, 9 insertions(+), 1 deletion(-)
---
diff --git a/gtk/theme/Adwaita/_common.scss b/gtk/theme/Adwaita/_common.scss
index 9dbe16c627..795cfb1c0b 100644
--- a/gtk/theme/Adwaita/_common.scss
+++ b/gtk/theme/Adwaita/_common.scss
@@ -315,6 +315,10 @@ entry {
       @extend .dim-label;
     }
 
+    block-cursor {
+      @include entry(block_cursor);
+    }
+
     &.flat {
       &:focus, &:backdrop, &:disabled, &:backdrop:disabled, & {
         min-height: 0;
diff --git a/gtk/theme/Adwaita/_drawing.scss b/gtk/theme/Adwaita/_drawing.scss
index fc8e599f9e..d4f2ce3e0d 100644
--- a/gtk/theme/Adwaita/_drawing.scss
+++ b/gtk/theme/Adwaita/_drawing.scss
@@ -39,7 +39,7 @@
 //        use the default one
 //
 // possible $t values:
-// normal, focus, insensitive, backdrop, backdrop-insensitive, osd, osd-focus, osd-backdrop;
+// normal, focus, insensitive, backdrop, backdrop-insensitive, osd, osd-focus, osd-backdrop, block_cursor;
 //
 
   $_blank_edge: if($edge == none, none, 0 1px transparentize($edge, 1));
@@ -111,6 +111,10 @@
     text-shadow: none;
     -gtk-icon-shadow: none;
   }
+  @if $t==block_cursor {
+    color: $base_color;
+    background-color: $text_color;
+  }
 }
 
 // buttons