sogo/UI/MailerUI/UIxMailSourceView.m
Wolfgang Sourdeau 956f628360 Monotone-Parent: dfb85b6efa469d0ee3fba3799df2f1247332f8ed
Monotone-Revision: 48ab3ba04ae37aa55ddec9a67b39c8be57786c6d

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2007-09-11T19:38:57
Monotone-Branch: ca.inverse.sogo
2007-09-11 19:38:57 +00:00

50 lines
1.4 KiB
Objective-C

/* UIxMailSourceView.m - this file is part of SOGo
*
* Copyright (C) 2007 Inverse groupe conseil
*
* Author: Wolfgang Sourdeau <wsourdeau@inverse.ca>
*
* This file is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2, or (at your option)
* any later version.
*
* This file is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; see the file COPYING. If not, write to
* the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
* Boston, MA 02111-1307, USA.
*/
#import <NGObjWeb/WOContext.h>
#import <NGObjWeb/WOResponse.h>
#import <Foundation/NSString.h>
#import <SoObjects/Mailer/SOGoMailObject.h>
#import <UI/Common/WODirectAction+SOGo.h>
#import "UIxMailSourceView.h"
@implementation UIxMailSourceView
- (WOResponse *) viewSourceAction
{
NSString *source;
WOResponse *response;
source = [[self clientObject] contentAsString];
response = [self responseWithStatus: 200];
[response setHeader: @"text/plain; charset=utf-8"
forKey: @"content-type"];
[response appendContentString: source];
return response;
}
@end