diff options
| author | Jules Tamagnan | 2018-10-30 10:22:03 -0700 |
|---|---|---|
| committer | Eli Zaretskii | 2018-11-10 10:06:50 +0200 |
| commit | ffb4c76d99ba9d4f5a0d876c23b2837d31291141 (patch) | |
| tree | 799541b022a0ff4f28d846bcbb7c51e79a5d9a92 /test/src | |
| parent | 4f0e54223a60a34818365475440e023747eab7e9 (diff) | |
| download | emacs-ffb4c76d99ba9d4f5a0d876c23b2837d31291141.tar.gz emacs-ffb4c76d99ba9d4f5a0d876c23b2837d31291141.zip | |
src/editfns.c (group-name): New function.
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/editfns-tests.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/test/src/editfns-tests.el b/test/src/editfns-tests.el index 17b2c510734..6ee0ab09f7b 100644 --- a/test/src/editfns-tests.el +++ b/test/src/editfns-tests.el | |||
| @@ -351,4 +351,11 @@ | |||
| 351 | (should (equal (format "%-#50.40x" v3) | 351 | (should (equal (format "%-#50.40x" v3) |
| 352 | "-0x000000003ffffffffffffffe000000000000000 ")))) | 352 | "-0x000000003ffffffffffffffe000000000000000 ")))) |
| 353 | 353 | ||
| 354 | (ert-deftest group-name () | ||
| 355 | (let ((list `((0 . "root") | ||
| 356 | (1000 . ,(user-login-name 1000)) | ||
| 357 | (1212345 . nil)))) | ||
| 358 | (dolist (test list) | ||
| 359 | (should (equal (group-name (car test)) (cdr test)))))) | ||
| 360 | |||
| 354 | ;;; editfns-tests.el ends here | 361 | ;;; editfns-tests.el ends here |