diff options
| author | Glenn Morris | 2008-11-25 04:24:45 +0000 |
|---|---|---|
| committer | Glenn Morris | 2008-11-25 04:24:45 +0000 |
| commit | 7efa8076ba599214d8e2cd9081ff9b40d6ffdb37 (patch) | |
| tree | 2b3e80cd954bc34537d6e803f36cb7f47cd29f98 | |
| parent | 96ead4f94b44c4bad9d2bd3850efd886bc8fe8e9 (diff) | |
| download | emacs-7efa8076ba599214d8e2cd9081ff9b40d6ffdb37.tar.gz emacs-7efa8076ba599214d8e2cd9081ff9b40d6ffdb37.zip | |
(speedbar-restricted-move): Fix signal arguments.
| -rw-r--r-- | lisp/speedbar.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/speedbar.el b/lisp/speedbar.el index 2a9f76152e9..b3157b22025 100644 --- a/lisp/speedbar.el +++ b/lisp/speedbar.el | |||
| @@ -1318,7 +1318,7 @@ and the existence of packages." | |||
| 1318 | "Move to the next ARGth line in a speedbar buffer at the same depth. | 1318 | "Move to the next ARGth line in a speedbar buffer at the same depth. |
| 1319 | This means that movement is restricted to a subnode, and that siblings | 1319 | This means that movement is restricted to a subnode, and that siblings |
| 1320 | of intermediate nodes are skipped." | 1320 | of intermediate nodes are skipped." |
| 1321 | (if (not (numberp arg)) (signal 'wrong-type-argument (list arg 'numberp))) | 1321 | (if (not (numberp arg)) (signal 'wrong-type-argument (list 'numberp arg))) |
| 1322 | ;; First find the extent for which we are allowed to move. | 1322 | ;; First find the extent for which we are allowed to move. |
| 1323 | (let ((depth (save-excursion (beginning-of-line) | 1323 | (let ((depth (save-excursion (beginning-of-line) |
| 1324 | (if (looking-at "[0-9]+:") | 1324 | (if (looking-at "[0-9]+:") |