blob: 0bfa8974823fa5d3827310a72a9600ead97003d6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
|
<!--
$FML$
-->
<sect1 id="fml.command.overview">
<title>
���ޥ�ɽ����γ���:
��4.0 �� 5.0 �Υ����ɤν����ϤɤΤ��餤�㤦������
</title>
<para>
���ޥ�ɤ�ŵ���إե�����������֤��٤����� help ���ޥ�ɤ���ˤȤ�����
���ޤ��礦��
</para>
<para>
5.0 �Ǥ� help �ե�����������֤������ɤμ��Τ�
FML::Command::User::help �ˤ��ꡢ
FML::Process::Command ���饹����
(FML::Command �� AUTOLOAD ���ͳ����)�ƤӽФ���ޤ���
</para>
<warning>
<para>
����: ���ƤΥ��ޥ�ɤ� FML::Command::User::���ޥ�� �⤷����
FML::Command::Admin::���ޥ�� ���饹�Ȥ��Ƽ�������Ƥ��ޤ���
�ʤ� makefml �� FML::Command::Admin::���ޥ�� ��Ȥ��ޤ���
</para>
</warning>
<para>
help �μ��Τ� FML::Command::User::help �Τ��δؿ��Ǥ���
<screen>
sub process
{
my ($self, $curproc, $optargs) = @_;
my $config = $curproc->{ config };
my $charset = $config->{ reply_message_charset };
my $help_file = $config->{ help_file };
# template substitution: kanji code, $varname expansion et. al.
my $params = {
src => $help_file,
charset_out => $charset,
};
my $help_template = $curproc->prepare_file_to_return( $params );
if (-f $help_template) {
$curproc->reply_message( {
type => "text/plain; charset=$charset",
path => $help_template,
filename => "help",
disposition => "help",
});
}
else {
croak("no help file ($help_template)\n");
}
}
</screen>
������ $curproc �� UNIX �����ͥ�Ǥ��ʤ��ߤ� current process ��¤�Τ�
�Υݥ�����������ϥå����ե���Ǥ���
������ $config �ϥå���Ȥ����ߤ����Ƥ��������ѿ����֤ϡ�4.0 �Ǥϥ�
�����Х��ѿ��Ǥ���
</para>
<para>
prepare_file_to_return() �ϥ�å������ƥ�ץ졼�Ȥ���ˤ����ѿ���Ÿ��
��ʸ���������Ѵ���Ŭ���Ԥʤ��ޤ���
</para>
<para>
$curproc->reply_message() �ϰ����ˤ�äƿ������Ȥʤ�ޤ�����
������ˤ��衢��å������塼��������åɤǤ���
</para>
<para>
���塼�������줿��å��������ϡ��ץ������ν�λľ���˰��̤Υ��Ȥ�
���Ȥ�Ω�Ƥʤ����졢Mail::Delivery ���饹��ͳ����������ޤ�����å���
�����塼�μ��ब�ե�����ȥ�å����������ߤ��Ƥ���С�Ŭ�� MIME �ޥ��
�ѡ��ȤΥ�å���������������ޤ���
</para>
<para>
���λ��Ȥߤ� fml 4.0 �� Notify() ��Ʊ�ͤǤ������������å����������塼
�������졢�Ǹ�˰쵤�˽��������Ȥ��������礭���ۤʤ�ޤ���get ����
��ɤʤɤ�Ʊ���褦�˰����ޤ����Ĥޤ� 4.0 �� Notify() ������ʬ��(�̾�
�ε��������ʳ���)������������ǽ��ô������Ȥ������ȤǤ���
�������ˤ����ơ������Υ��塼���Υᥫ�˥�����礭���ۤʤäƤ��ޤ���
</para>
</sect1>
|
