X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fdictionary%2Fdelete-variables.c;h=bf6006a86c8a3c11f20c0bf34a3341fe87ac5a28;hb=0fc606c52d7cec253af9b7463b15baabfbc9a33a;hp=526fa1cd41f5e755ca86d55322670c57facbf521;hpb=81579d9e9f994fb2908f50af41c3eb033d216e58;p=pspp diff --git a/src/language/dictionary/delete-variables.c b/src/language/dictionary/delete-variables.c index 526fa1cd41..bf6006a86c 100644 --- a/src/language/dictionary/delete-variables.c +++ b/src/language/dictionary/delete-variables.c @@ -1,5 +1,5 @@ /* PSPP - a program for statistical analysis. - Copyright (C) 2006, 2007, 2011 Free Software Foundation, Inc. + Copyright (C) 2006, 2007, 2010, 2011, 2013 Free Software Foundation, Inc. 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 @@ -19,8 +19,8 @@ #include #include "data/casereader.h" +#include "data/dataset.h" #include "data/dictionary.h" -#include "data/procedure.h" #include "language/command.h" #include "language/lexer/variable-parser.h" #include "libpspp/message.h" @@ -37,19 +37,21 @@ cmd_delete_variables (struct lexer *lexer, struct dataset *ds) bool ok; if (proc_make_temporary_transformations_permanent (ds)) - msg (SE, _("DELETE VARIABLES may not be used after TEMPORARY. " - "Temporary transformations will be made permanent.")); + msg (SE, _("%s may not be used after %s. " + "Temporary transformations will be made permanent."), + "DELETE VARIABLES", "TEMPORARY"); if (!parse_variables (lexer, dataset_dict (ds), &vars, &var_cnt, PV_NONE)) goto error; if (var_cnt == dict_get_var_cnt (dataset_dict (ds))) { - msg (SE, _("DELETE VARIABLES may not be used to delete all variables " - "from the active file dictionary. Use NEW FILE instead.")); + msg (SE, _("%s may not be used to delete all variables " + "from the active dataset dictionary. " + "Use %s instead."), "DELETE VARIABLES", "NEW FILE"); goto error; } - ok = casereader_destroy (proc_open (ds)); + ok = casereader_destroy (proc_open_filtering (ds, false)); ok = proc_commit (ds) && ok; if (!ok) goto error;