Bundesgericht Tribunal fédéral Tribunale federale Tribunal federal {T 0/2} 6B_618/2008/bri Arręt du 23 septembre 2008 Cour de droit pénal Composition M. le Juge Schneider, Président. Greffier: M. Oulevey. Parties X.________, recourant, contre Ministčre public du canton de Vaud, rue de l'Université 24, 1005 Lausanne, intimé. Objet Prononcé de non-lieu (calomnie, subsidiairement diffamation), recours contre l'arręt du Tribunal d'accusation du Tribunal cantonal du canton de Vaud du 18 avril 2008. Faits: A. X.________ a porté plainte pour calomnie, subsidiairement diffamation, contre A.________. Par un arręt du 18 avril 2008, le Tribunal d'accusation du canton de Vaud a confirmé le non-lieu rendu en faveur de la prévenue. B. X.________ recourt contre cet arręt, dont il demande l'annulation avec renvoi ŕ la cour cantonale, afin que diverses mesures d'instruction soient encore prises. Il n'a pas été ordonné d'échange d'écritures. Considérant en droit: 1. Ŕ moins qu'il ne se plaigne de la violation d'un droit formel, entičrement séparé du fond, que lui accorde le droit cantonal de procédure, le lésé n'a pas qualité pour recourir au Tribunal fédéral contre une ordonnance de non-lieu si l'infraction ne l'a pas directement atteint dans son intégrité corporelle, sexuelle ou psychique (ATF 133 IV 228 et les références; arręt 6B_480/2007 du 31 janvier 2008, consid. 1.1 et 1.3). En l'espčce, le recourant remet en cause l'appréciation des preuves de la cour cantonale, soit le jugement de l'affaire au fond. Il est manifestement sans qualité pour ce faire. Dčs lors, son recours doit ętre déclaré irrecevable en application de l'art. 108 al. 1 let. a LTF. 2. Le recourant, qui succombe, doit supporter les frais de justice, réduits ŕ 800 fr. lorsque la cause est tranchée par le juge unique en application de l'art. 108 al. 1 let. a LTF. Par ces motifs, le Président prononce: 1. Le recours est irrecevable. 2. Les frais judiciaires, arrętés ŕ 800 fr., sont mis ŕ la charge du recourant. 3. Le présent arręt est communiqué aux parties et au Tribunal d'accusation du canton de Vaud. Lausanne, le 23 septembre 2008 Au nom de la Cour de droit pénal du Tribunal fédéral suisse Le Président: Le Greffier: Schneider Oulevey