hedgewars/uStore.pas
changeset 3757 ad2f669c8435
parent 3697 d5b30d6373fc
child 3764 eb91c02f2d84
--- a/hedgewars/uStore.pas	Mon Aug 23 12:53:00 2010 +0200
+++ b/hedgewars/uStore.pas	Mon Aug 23 13:58:46 2010 +0200
@@ -1158,7 +1158,7 @@
     vendor:= LowerCase(shortstring(pchar(glGetString(GL_VENDOR))));
 {$IFDEF DEBUGFILE}
     AddFileLog('OpenGL-- Renderer: ' + shortstring(pchar(glGetString(GL_RENDERER))));
-    AddFileLog('  |----- Vendor: ' + vendor);
+    AddFileLog('  |----- Vendor: ' + shortstring(pchar(glGetString(GL_VENDOR))));
     AddFileLog('  |----- Version: ' + shortstring(pchar(glGetString(GL_VERSION))));
     AddFileLog('  \----- GL_MAX_TEXTURE_SIZE: ' + inttostr(MaxTextureSize));
 {$ENDIF}