From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <darkstar@altlinux.ru>
From: "Albert R. Valiev" <darkstar@altlinux.ru>
Organization: ALT Linux Team
To: sisyphus@altlinux.ru
Subject: Re: [sisyphus] dictd question
Date: Thu, 14 Nov 2002 14:26:29 +0300
User-Agent: KMail/1.5
References: <200211141012.51031.darkstar@altlinux.ru> <20021114101042.GC26743@sam-solutions.net>
In-Reply-To: <20021114101042.GC26743@sam-solutions.net>
MIME-Version: 1.0
Content-Type: Text/Plain;
  charset="koi8-r"
Content-Transfer-Encoding: 8bit
Content-Description: clearsigned data
Content-Disposition: inline
Message-Id: <200211141426.30685.darkstar@altlinux.ru>
Sender: sisyphus-admin@altlinux.ru
Errors-To: sisyphus-admin@altlinux.ru
X-BeenThere: sisyphus@altlinux.ru
X-Mailman-Version: 2.0.9
Precedence: bulk
Reply-To: sisyphus@altlinux.ru
List-Unsubscribe: <http://altlinux.ru/mailman/listinfo/sisyphus>,
	<mailto:sisyphus-request@altlinux.ru?subject=unsubscribe>
List-Id: <sisyphus.altlinux.ru>
List-Post: <mailto:sisyphus@altlinux.ru>
List-Help: <mailto:sisyphus-request@altlinux.ru?subject=help>
List-Subscribe: <http://altlinux.ru/mailman/listinfo/sisyphus>,
	<mailto:sisyphus-request@altlinux.ru?subject=subscribe>
List-Archive: <http://altlinux.ru/pipermail/sisyphus/>
Archived-At: <http://lore.altlinux.org/sisyphus/200211141426.30685.darkstar@altlinux.ru/>
List-Archive: <http://lore.altlinux.org/sisyphus/>

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

В сообщении от 14 Ноябрь 2002 13:10 Alexander Bokovoy написал:
> On Thu, Nov 14, 2002 at 10:12:49AM +0300, Albert R. Valiev wrote:
> > Народ, кто-нить знает, можно ли заставить сервер dictd отдавать данные в
> > кодировке cp1251 (сейчас отдает в utf-8) и, если можно, как это сделать?
>
> Вопрос: зачем? Не лучше ли настроить на стороне клиента?
> Протокол DICT не содержит средств указания кодировки передаваемой
> информации.

в таком случае кто-нить могет подсказать следующую вещь:

есть tcl скрипт. берет он строчку из dictd. выдает он ее таким способом:
- --------------------------------------
        if {[string length [string trim $text]] < 1} { return }
        if {!$type} { putdcc $dest "[dictionary_dopre]$text" ; return }
        switch -- $::dictionary_setting(rplmode) {
                "0" { putserv "PRIVMSG $dest :$text" }
- -------------------------------------

так как я в tcl профан полный и разобраться пока никак не могу, вопрос - как 
перекодировать содержимое переменной $text из utf8 в cp1251? если можно, 
сразу с примером :)))

- -- 

With Best Regards, Albert R. Valiev
- ------------------------------------
ALT Linux Team [www.altlinux.ru]
KDE Development Team [www.kde.org]
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.2.1 (GNU/Linux)

iD8DBQE904hl7d6wAH+0KuARAu7KAJ0Xqdac6TGKm6OTqIu8VjcZyCHfEgCguUav
Ay7T6tgYOOGveCiuf1ah688=
=Q2X7
-----END PGP SIGNATURE-----