Index: modules/rest/pkgIndex.tcl
==================================================================
--- modules/rest/pkgIndex.tcl
+++ modules/rest/pkgIndex.tcl
@@ -1,2 +1,2 @@
 if {![package vsatisfies [package provide Tcl] 8.5]} {return}
-package ifneeded rest 1.3 [list source [file join $dir rest.tcl]]
+package ifneeded rest 1.3.1 [list source [file join $dir rest.tcl]]

Index: modules/rest/rest.man
==================================================================
--- modules/rest/rest.man
+++ modules/rest/rest.man
@@ -1,7 +1,7 @@
 [comment {-*- tcl -*- doctools manpage}]
-[vset VERSION 1.3]
+[vset VERSION 1.3.1]
 [manpage_begin rest n [vset VERSION]]
 [moddesc   {A framework for RESTful web services}]
 [titledesc {define REST web APIs and call them inline or asychronously}]
 [require Tcl 8.5]
 [require rest [opt [vset VERSION]]]

Index: modules/rest/rest.tcl
==================================================================
--- modules/rest/rest.tcl
+++ modules/rest/rest.tcl
@@ -10,11 +10,11 @@
 package require http 2.7
 package require json
 package require tdom
 package require base64
 
-package provide rest 1.3
+package provide rest 1.3.1
 
 namespace eval ::rest {
     namespace export create_interface parameters parse_opts save \
     describe substitute
 }
@@ -107,15 +107,15 @@
 	# Not a proper list. String processing.
 	# Simple: Assume name without spaces.
 	# TODO: Quoted literal.
 	regexp {^([^ ]+).*$} $cmd -> cmd
     }
+    set cmd [namespace tail $cmd]    
+    if {$cmd eq "simple"} { set cmd get }
     if {$cmd ni {get delete head post put patch}} {
 	return -code error "Unable to determine rest::simple method, found \"$cmd\". Please specify it explicitly."
     }
-    set cmd [namespace tail $cmd]    
-    if {$cmd eq "simple"} { set cmd get }
     #puts >>>|$cmd|
     dict set config method $cmd
     return
 }