diff options
| author | Daniil Baturin <daniil@baturin.org> | 2015-04-06 03:23:33 +0600 |
|---|---|---|
| committer | Daniil Baturin <daniil@baturin.org> | 2015-04-06 03:23:33 +0600 |
| commit | 657c7cfeed950cb1282866c85f63b696f99411d0 (patch) | |
| tree | 5b05a29e169fea853bd6aeb6595222fdd252246b | |
| parent | 50df08977effb03313051ab77a9f0a93490f487a (diff) | |
| download | hvinfo-657c7cfeed950cb1282866c85f63b696f99411d0.tar.gz hvinfo-657c7cfeed950cb1282866c85f63b696f99411d0.zip | |
Oops, bhyve CPUID signature has a trailing space.
| -rw-r--r-- | src/hypervisor_check.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/hypervisor_check.adb b/src/hypervisor_check.adb index 826a0a2..30bccf3 100644 --- a/src/hypervisor_check.adb +++ b/src/hypervisor_check.adb @@ -124,7 +124,7 @@ package body Hypervisor_Check is Vendor_Name := To_Unbounded_String ("VMWare"); elsif Vendor_String = "Microsoft Hv" then Vendor_Name := To_Unbounded_String ("Microsoft Hyper-V"); - elsif Vendor_String = "bhyve bhyve" then + elsif Vendor_String = "bhyve bhyve " then Vendor_Name := To_Unbounded_String (bhyve); else Vendor_Name := To_Unbounded_String ("Unknown hypervisor"); |