1/* NLS support. 2 Copyright (C) 2007-2021 Sergey Poznyakoff 3 4 This program is free software; you can redistribute it and/or modify 5 it under the terms of the GNU General Public License as published by 6 the Free Software Foundation; either version 3, or (at your option) 7 any later version. 8 9 This program is distributed in the hope that it will be useful, 10 but WITHOUT ANY WARRANTY; without even the implied warranty of 11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 12 GNU General Public License for more details. 13 14 You should have received a copy of the GNU General Public License 15 along with this program. If not, see <http://www.gnu.org/licenses/>. */ 16 17module 'gettext'. 18 19string mailfromd_domain "mailfromd" 20 21func textdomain(string domainname) 22 returns string 23do 24 set ret mailfromd_domain 25 if domainname != "" 26 set mailfromd_domain domainname 27 fi 28 return ret 29done 30 31func gettext(string msgid) 32 returns string 33do 34 return dgettext(mailfromd_domain, msgid) 35done 36 37func ngettext(string msgid, string msgid_plural, number n) 38 returns string 39do 40 return dngettext(mailfromd_domain, msgid, msgid_plural, n) 41done 42 43