Small Fixes (#11236)

- Left over from the last PR.
- Widget for `headers` in `URL.fetch` extension.
- Fix `Left` and Right` to allow columns or expressions in it.

(cherry picked from commit a2c853c6e3)

distribution/lib/Standard/Base/0.0.0-dev/src/Data/Dictionary.enso

@@ -447,7 +447,7 @@ key_widget dict:Dictionary -> Widget =
 
 ## PRIVATE
 key_value_widget -> Widget =
-    fqn = Meta.get_qualified_type_name Pair . drop (..Last 5)
+    fqn = Meta.get_qualified_type_name Pair . take (..Before_Last '.')
     default = 'pair "key" Nothing'
     pair = Option "Pair" fqn+".pair" [["first", make_all_selector], ["second", make_all_selector]]
     item_editor = Single_Choice display=..Always values=[pair]

distribution/lib/Standard/Base/0.0.0-dev/src/Data/Json.enso

@@ -429,7 +429,7 @@ make_enso object =
 ## PRIVATE
 key_value_widget : Widget
 key_value_widget =
-    fqn = Meta.get_qualified_type_name Pair . drop (..Last 5)
+    fqn = Meta.get_qualified_type_name Pair . take (..Before_Last '.')
     default = 'pair "key" Nothing'
     pair = Option "Pair" fqn+".pair" [["first", Text_Input], ["second", make_all_selector]]
     item_editor = Single_Choice display=..Always values=[pair]

distribution/lib/Standard/Base/0.0.0-dev/src/Network/Extensions.enso

@@ -43,6 +43,7 @@ Text.to_uri self = URI.parse self
      Defaults to `Auto_Detect`. If `Raw_Response` is selected or if the format
      cannot be determined automatically, a raw HTTP `Response` will be returned.
 @format Data_Read_Helpers.format_widget_with_raw_response
+@headers Header.default_widget
 URI.fetch : HTTP_Method -> Vector (Header | Pair Text Text) -> File_Format -> Any
 URI.fetch self (method:HTTP_Method=..Get) headers=[] format=Auto_Detect =
     Data.fetch self method headers format

distribution/lib/Standard/Base/0.0.0-dev/src/Network/HTTP/Request_Body.enso

@@ -84,7 +84,7 @@ make_all_with_json =
 
 ## PRIVATE
 dictionary_widget -> Widget =
-    fqn = Meta.get_qualified_type_name Pair . drop (..Last 5)
+    fqn = Meta.get_qualified_type_name Pair . take (..Before_Last '.')
     default = 'pair "key" ""'
     value_editor = Single_Choice display=..Always values=[Option "Text" '""', Option "File" "File.new ''"]
     pair = Option "Pair" fqn+".pair" [["first", Text_Input], ["second", value_editor]]

distribution/lib/Standard/Database/0.0.0-dev/src/Connection/Connection_Options.enso

@@ -22,7 +22,7 @@ type Connection_Options
        Widget to design connection options.
     default_widget : Widget
     default_widget =
-        fqn = Meta.get_qualified_type_name Pair . drop (..Last 5)
+        fqn = Meta.get_qualified_type_name Pair . take (..Before_Last '.')
         default = 'pair "key" "value"'
         pair = Option "Pair" fqn+".pair" [["first", Text_Input], ["second", make_text_secret_selector]]
         item_editor = Single_Choice display=..Always values=[pair]

distribution/lib/Standard/Database/0.0.0-dev/src/DB_Column.enso

@@ -103,7 +103,7 @@ type DB_Column
     info : Table
     info self -> Table = self.to_table.column_info
 
-    ## ALIAS load, import
+    ## ALIAS import, load
        GROUP Standard.Base.Input
        ICON data_input
        Returns a materialized column containing rows of this column.

distribution/lib/Standard/Table/0.0.0-dev/src/Simple_Expression.enso

@@ -94,10 +94,10 @@ type Simple_Expression
 ## Defines a set of Text based operations.
 type Text_Operation
     ## Takes the first characters from the input column.
-    Left (length : Integer = 1)
+    Left (length : Column_Ref|Expression|Integer = 1)
 
     ## Takes the first characters from the input column.
-    Right (length : Integer = 1)
+    Right (length : Column_Ref|Expression|Integer = 1)
 
     ## Returns the character length of the input column.
     Length