Issue #2725081 by quietone: Previous versions of Drupal allow vocabulary...

Issue #2725081 by quietone: Previous versions of Drupal allow vocabulary machine names longer than 32 characters

core/modules/migrate_drupal/tests/fixtures/drupal7.php

@@ -42953,6 +42953,15 @@
   'module' => 'taxonomy',
   'weight' => '0',
 ))
+->values(array(
+  'vid' => '4',
+  'name' => 'vocabulary name much longer than thirty two characters',
+  'machine_name' => 'vocabulary_name_much_longer_than_thirty_two_characters',
+  'description' => 'description of vocabulary name much longer than thirty two characters',
+  'hierarchy' => '1',
+  'module' => 'taxonomy',
+  'weight' => '0',
+))
 ->execute();
 
 $connection->schema()->createTable('tracker_node', array(

core/modules/migrate_drupal_ui/src/Tests/d7/MigrateUpgrade7Test.php

@@ -59,7 +59,7 @@ protected function getEntityCounts() {
       'action' => 16,
       'menu' => 6,
       'taxonomy_term' => 18,
-      'taxonomy_vocabulary' => 3,
+      'taxonomy_vocabulary' => 4,
       'tour' => 4,
       'user' => 4,
       'user_role' => 3,

core/modules/taxonomy/migration_templates/d7_taxonomy_vocabulary.yml

@@ -5,7 +5,16 @@ migration_tags:
 source:
   plugin: d7_taxonomy_vocabulary
 process:
-  vid: machine_name
+  vid:
+    -
+      plugin: machine_name
+      source: name
+    -
+      plugin: dedupe_entity
+      entity_type: taxonomy_vocabulary
+      field: vid
+      length: 32
+      migrated: true
   label: name
   name: name
   description: description

core/modules/taxonomy/tests/src/Kernel/Migrate/d7/MigrateTaxonomyVocabularyTest.php

@@ -57,6 +57,7 @@ public function testTaxonomyVocabulary() {
     $this->assertEntity('tags', 'Tags', 'Use tags to group articles on similar topics into categories.', VocabularyInterface::HIERARCHY_DISABLED, 0);
     $this->assertEntity('forums', 'Forums', 'Forum navigation vocabulary', VocabularyInterface::HIERARCHY_SINGLE, -10);
     $this->assertEntity('test_vocabulary', 'Test Vocabulary', 'This is the vocabulary description', VocabularyInterface::HIERARCHY_SINGLE, 0);
+    $this->assertEntity('vocabulary_name_much_longer_than', 'vocabulary name much longer than thirty two characters', 'description of vocabulary name much longer than thirty two characters', VocabularyInterface::HIERARCHY_SINGLE, 0);
   }
 
 }