<?php // -*- php -*-
// Copyright (C) 2012, Wolfgang Scherer, <Wolfgang.Scherer at gmx.de>
// Sponsored by WIEDENMANN SEILE GMBH, http://www.wiedenmannseile.de
//
// This file is part of Wiedenmann Vacation.
//
// This program 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 3 of the License, or
// (at your option) any later version.
//
// This program 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. If not, see <http://www.gnu.org/licenses/>,
// or write to Wolfgang Scherer, <Wolfgang.Scherer at gmx.de>

// $_REQUEST['_DEBUG_'] = 1;
// $_REQUEST['_DEBUG_TEST_'] = 1;
require_once(dirname(__FILE__) . '/../lib/util.php');


echo "--------------------------------------------------\n";
$subject = '$SUBJECT';
$subject = 'Re: ?= $SUBJECT$SUBJECT, äöü ?=$SUBJECT';
$subject = subject_quoted_printable_encode($subject);
echo 'Subject: ' . $subject . "\n";
// var_dump($subject_partsq);

echo "--------------------------------------------------\n";

$sencoded = $subject . '+' . $subject;
$subject = subject_quoted_printable_decode($sencoded);
echo 'Subject: ' . $subject . "\n";

echo "--------------------------------------------------\n";
echo "vacation_split: undecoded\n";
echo "--------------------------------------------------\n";
$msg = get_text('vacation');
$vacationa = vacation_split($msg, False);
$subject = $vacationa[0];
$headers = $vacationa[1];
$body = $vacationa[2];

$msg = vacation_join($subject, $body, $headers);
echo $msg."\n";

echo "--------------------------------------------------\n";
echo "vacation_split: decoded\n";
echo "--------------------------------------------------\n";
$vacationa = vacation_split($msg, True);
$subject = $vacationa[0];
$headers = $vacationa[1];
$body = $vacationa[2];

$msg = vacation_join($subject, $body);
echo $msg."\n";

echo "--------------------------------------------------\n";
$vacationa = vacation_split($msg, True);
$subject = $vacationa[0];
$headers = $vacationa[1];
$body = $vacationa[2];

$msg = vacation_join($subject . 'äöü', $body);
echo $msg."\n";

echo "--------------------------------------------------\n";
$vacationa = vacation_split($msg, True);
$subject = $vacationa[0];
$headers = $vacationa[1];
$body = $vacationa[2];

echo 'Subject: '.$subject."\n";
echo 'Headers: '. $headers."\n";
echo 'Body: '.$body."\n";

echo "--------------------------------------------------\n";
$msg = vacation_join($subject, $body);
echo $msg."\n";

//
// :ide-menu: Emacs IDE Menu - Buffer @BUFFER@
// . M-x `eIDE-menu' ()(eIDE-menu "z")
// :ide: COMPILE: PHP _DEBUG_=2 _DEBUG_TEST_=2
// . (compile (concat "php " (file-name-nondirectory (buffer-file-name)) " _DEBUG_=2 _DEBUG_TEST_=2"))

// :ide: QUO: $this->
// . (insert "$this->" )

// :ide: COMPILE: PHP w/o args
// . (compile (concat "php " (file-name-nondirectory (buffer-file-name)) ""))

// :ide: COMPILE: PHP _DEBUG_=1 _DEBUG_TEST_=1
// . (compile (concat "php " (file-name-nondirectory (buffer-file-name)) " _DEBUG_=1 _DEBUG_TEST_=1"))

//
// Local Variables:
// mode: php
// End:
?>