blob: 87b6643606e256e31644ac9b5960dcb6ce4b77c8 (
plain)
1
2
3
4
5
6
7
8
9
|
# -*- mode: snippet -*-
# name: command args
# key: cargs
# --
args <- commandArgs(trailingOnly = TRUE)
if (length(args) != $1)
stop("Usage: `(file-name-nondirectory (buffer-file-name))` $2")
$0 <- args[1]
|