extsay-ng/extsay.c
author Mikael Berthe <mikael@lilotux.net>
Sun, 11 Apr 2010 15:27:59 +0200
changeset 37 a05815df848c
parent 35 337add12c399
child 40 5cd4b42ada91
permissions -rw-r--r--
Update headers
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
     1
/*
37
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
     2
 *  Module "extsay"     -- adds a /extsay command
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
     3
 *                         Spawns an external editor, using screen
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
     4
 *                         See the README file
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
     5
 *
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
     6
 * Copyright (C) 2010 Mikael Berthe <mikael@lilotux.net>
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
     7
 *
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
     8
 * This module is free software: you can redistribute it and/or modify
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
     9
 * it under the terms of the GNU General Public License as published by
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
    10
 * the Free Software Foundation, either version 2 of the License, or
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
    11
 * (at your option) any later version.
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
    12
 *
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
    13
 * This program is distributed in the hope that it will be useful,
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
    14
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
    15
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
    16
 * GNU General Public License for more details.
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
    17
 *
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
    18
 * You should have received a copy of the GNU General Public License
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
    19
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
a05815df848c Update headers
Mikael Berthe <mikael@lilotux.net>
parents: 35
diff changeset
    20
 */
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    22
#include <unistd.h>
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    23
#include <stdlib.h>
29
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
    24
#include <string.h>
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    25
#include <sys/wait.h>
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    26
#include <glib/gstdio.h>
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    27
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    28
#include <mcabber/modules.h>
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    29
#include <mcabber/commands.h>
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    30
#include <mcabber/settings.h>
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    31
#include <mcabber/compl.h>
25
a98004eb58cd [extsay] Expand extsay_script_path path name
Mikael Berthe <mikael@lilotux.net>
parents: 24
diff changeset
    32
#include <mcabber/utils.h>
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    33
#include <mcabber/logprint.h>
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    34
35
337add12c399 Rename the extsayng module to extsay
Mikael Berthe <mikael@lilotux.net>
parents: 31
diff changeset
    35
static void extsay_init(void);
337add12c399 Rename the extsayng module to extsay
Mikael Berthe <mikael@lilotux.net>
parents: 31
diff changeset
    36
static void extsay_uninit(void);
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    37
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    38
/* Module description */
35
337add12c399 Rename the extsayng module to extsay
Mikael Berthe <mikael@lilotux.net>
parents: 31
diff changeset
    39
module_info_t info_extsay = {
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    40
        .branch         = MCABBER_BRANCH,
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    41
        .api            = MCABBER_API_VERSION,
35
337add12c399 Rename the extsayng module to extsay
Mikael Berthe <mikael@lilotux.net>
parents: 31
diff changeset
    42
        .version        = "0.02",
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    43
        .description    = "Use external editor to send a message",
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    44
        .requires       = NULL,
35
337add12c399 Rename the extsayng module to extsay
Mikael Berthe <mikael@lilotux.net>
parents: 31
diff changeset
    45
        .init           = extsay_init,
337add12c399 Rename the extsayng module to extsay
Mikael Berthe <mikael@lilotux.net>
parents: 31
diff changeset
    46
        .uninit         = extsay_uninit,
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    47
        .next           = NULL,
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    48
};
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    49
24
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    50
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    51
// Run the external helper script with parameters
23
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
    52
static void screen_run_script(const gchar *args)
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    53
{
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    54
  GError *err = NULL;
24
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    55
  gchar *argv[] = { "screen", "-r", "-X", "screen", NULL,
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    56
                    NULL, NULL, NULL, NULL };
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    57
  gchar strwinheight[32];
25
a98004eb58cd [extsay] Expand extsay_script_path path name
Mikael Berthe <mikael@lilotux.net>
parents: 24
diff changeset
    58
  gchar *fpath;
a98004eb58cd [extsay] Expand extsay_script_path path name
Mikael Berthe <mikael@lilotux.net>
parents: 24
diff changeset
    59
  gboolean winsplit, ret;
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    60
24
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    61
  // screen -r -X screen $path/extsay.sh [jid [winsplit [height]]]
25
a98004eb58cd [extsay] Expand extsay_script_path path name
Mikael Berthe <mikael@lilotux.net>
parents: 24
diff changeset
    62
  fpath = (gchar*)settings_opt_get("extsay_script_path");
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    63
24
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    64
  // Helper script path
25
a98004eb58cd [extsay] Expand extsay_script_path path name
Mikael Berthe <mikael@lilotux.net>
parents: 24
diff changeset
    65
  if (!fpath || !fpath[0]) {
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    66
    scr_log_print(LPRINT_NORMAL, "Please set option 'extsay_script_path'.");
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    67
    return;
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    68
  }
25
a98004eb58cd [extsay] Expand extsay_script_path path name
Mikael Berthe <mikael@lilotux.net>
parents: 24
diff changeset
    69
  fpath = expand_filename(fpath);
a98004eb58cd [extsay] Expand extsay_script_path path name
Mikael Berthe <mikael@lilotux.net>
parents: 24
diff changeset
    70
  argv[4] = fpath;
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    71
24
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    72
  // Helper script parameter #1
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    73
  if (args && *args)
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    74
    argv[5] = (gchar*)args;
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    75
  else
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    76
    argv[5] = ".";
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    77
25
a98004eb58cd [extsay] Expand extsay_script_path path name
Mikael Berthe <mikael@lilotux.net>
parents: 24
diff changeset
    78
  // Update parameters for the helper script
a98004eb58cd [extsay] Expand extsay_script_path path name
Mikael Berthe <mikael@lilotux.net>
parents: 24
diff changeset
    79
  winsplit = settings_opt_get_int("extsay_split_win");
24
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    80
  if (winsplit) {
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    81
    gint winheight = settings_opt_get_int("extsay_win_height");
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    82
    argv[6] = "winsplit";       // Helper script parameter #2
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    83
    if (winheight > 0 && winheight < 256) {
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    84
      snprintf(strwinheight, sizeof strwinheight, "%d", winheight);
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    85
      argv[7] = strwinheight;   // Helper script parameter #3
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    86
    }
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    87
  }
81cbb47f1aa6 [extsay] Add options to split the screen window
Mikael Berthe <mikael@lilotux.net>
parents: 23
diff changeset
    88
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    89
  ret = g_spawn_async(NULL, argv, NULL,
23
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
    90
                      G_SPAWN_SEARCH_PATH |
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
    91
                        G_SPAWN_STDOUT_TO_DEV_NULL|G_SPAWN_STDERR_TO_DEV_NULL,
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    92
                      NULL, NULL, NULL, &err);
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    93
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    94
  if (!ret)
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    95
    scr_LogPrint(LPRINT_NORMAL, err->message);
25
a98004eb58cd [extsay] Expand extsay_script_path path name
Mikael Berthe <mikael@lilotux.net>
parents: 24
diff changeset
    96
a98004eb58cd [extsay] Expand extsay_script_path path name
Mikael Berthe <mikael@lilotux.net>
parents: 24
diff changeset
    97
  g_free(fpath);
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    98
}
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
    99
35
337add12c399 Rename the extsayng module to extsay
Mikael Berthe <mikael@lilotux.net>
parents: 31
diff changeset
   100
static void do_extsay(gchar *args)
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   101
{
29
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
   102
  gboolean expandfjid = FALSE;
30
7738b1e4714d [extsay] Code cleanup
Mikael Berthe <mikael@lilotux.net>
parents: 29
diff changeset
   103
  gchar *fjid;
23
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   104
29
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
   105
  if (args && !strncmp(args, "." JID_RESOURCE_SEPARATORSTR, 2))
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
   106
    expandfjid = TRUE;
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
   107
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
   108
  if (!args || !*args || expandfjid || !g_strcmp0(args, ".")) {
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
   109
    const gchar *res = args+2;
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
   110
    gpointer bud;
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
   111
23
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   112
    if (!current_buddy) {
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   113
      scr_LogPrint(LPRINT_NORMAL, "Please select a buddy.");
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   114
      return;
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   115
    }
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   116
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   117
    bud = BUDDATA(current_buddy);
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   118
    if (!(buddy_gettype(bud) &
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   119
          (ROSTER_TYPE_USER|ROSTER_TYPE_AGENT|ROSTER_TYPE_ROOM))) {
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   120
      scr_LogPrint(LPRINT_NORMAL, "This is not a user.");
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   121
      return;
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   122
    }
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   123
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   124
    args = (gchar*)buddy_getjid(bud);
29
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
   125
    if (expandfjid && *res) {
30
7738b1e4714d [extsay] Code cleanup
Mikael Berthe <mikael@lilotux.net>
parents: 29
diff changeset
   126
      char *res_utf8 = to_utf8(res);
7738b1e4714d [extsay] Code cleanup
Mikael Berthe <mikael@lilotux.net>
parents: 29
diff changeset
   127
      fjid = g_strdup_printf("%s%c%s", args, JID_RESOURCE_SEPARATOR, res_utf8);
7738b1e4714d [extsay] Code cleanup
Mikael Berthe <mikael@lilotux.net>
parents: 29
diff changeset
   128
      g_free(res_utf8);
31
816373e58b6c [extsay] Fix previous commit
Mikael Berthe <mikael@lilotux.net>
parents: 30
diff changeset
   129
    } else {
816373e58b6c [extsay] Fix previous commit
Mikael Berthe <mikael@lilotux.net>
parents: 30
diff changeset
   130
      fjid = g_strdup(args);
29
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
   131
    }
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
   132
  } else {
30
7738b1e4714d [extsay] Code cleanup
Mikael Berthe <mikael@lilotux.net>
parents: 29
diff changeset
   133
    fjid = to_utf8(args);
23
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   134
  }
cf95a475825c [extsay] Multiple improvements
Mikael Berthe <mikael@lilotux.net>
parents: 21
diff changeset
   135
30
7738b1e4714d [extsay] Code cleanup
Mikael Berthe <mikael@lilotux.net>
parents: 29
diff changeset
   136
  if (check_jid_syntax(fjid))
29
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
   137
    scr_LogPrint(LPRINT_NORMAL, "Please specify a valid Jabber ID.");
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
   138
  else
30
7738b1e4714d [extsay] Code cleanup
Mikael Berthe <mikael@lilotux.net>
parents: 29
diff changeset
   139
    screen_run_script(fjid); // Launch helper script with resulting JID
29
b6fb487c2658 [extsay] Enable /extsay ./resourcename
Mikael Berthe <mikael@lilotux.net>
parents: 25
diff changeset
   140
30
7738b1e4714d [extsay] Code cleanup
Mikael Berthe <mikael@lilotux.net>
parents: 29
diff changeset
   141
  g_free(fjid);
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   142
}
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   143
35
337add12c399 Rename the extsayng module to extsay
Mikael Berthe <mikael@lilotux.net>
parents: 31
diff changeset
   144
static void extsay_init(void)
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   145
{
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   146
  cmd_add("extsay", "Use external editor to write a message",
35
337add12c399 Rename the extsayng module to extsay
Mikael Berthe <mikael@lilotux.net>
parents: 31
diff changeset
   147
          COMPL_JID, 0, do_extsay, NULL);
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   148
}
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   149
35
337add12c399 Rename the extsayng module to extsay
Mikael Berthe <mikael@lilotux.net>
parents: 31
diff changeset
   150
static void extsay_uninit(void)
21
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   151
{
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   152
  cmd_del("extsay");
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   153
}
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   154
9798e3aaa851 Add module extsayng, rename previous one to extsay_old
Mikael Berthe <mikael@lilotux.net>
parents:
diff changeset
   155
/* vim: set expandtab cindent cinoptions=>2\:2(0:  For Vim users... */