{"action":"opened","issue":{"url":"https://api.github.com/repos/ropensci/rvertnet/issues/31","labels_url":"https://api.github.com/repos/ropensci/rvertnet/issues/31/labels{/name}","comments_url":"https://api.github.com/repos/ropensci/rvertnet/issues/31/comments","events_url":"https://api.github.com/repos/ropensci/rvertnet/issues/31/events","html_url":"https://github.com/ropensci/rvertnet/issues/31","id":55052694,"number":31,"title":"Missing else","user":{"login":"sckott","id":577668,"avatar_url":"https://avatars.githubusercontent.com/u/577668?v=3","gravatar_id":"","url":"https://api.github.com/users/sckott","html_url":"https://github.com/sckott","followers_url":"https://api.github.com/users/sckott/followers","following_url":"https://api.github.com/users/sckott/following{/other_user}","gists_url":"https://api.github.com/users/sckott/gists{/gist_id}","starred_url":"https://api.github.com/users/sckott/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/sckott/subscriptions","organizations_url":"https://api.github.com/users/sckott/orgs","repos_url":"https://api.github.com/users/sckott/repos","events_url":"https://api.github.com/users/sckott/events{/privacy}","received_events_url":"https://api.github.com/users/sckott/received_events","type":"User","site_admin":false},"labels":[],"state":"open","locked":false,"assignee":null,"milestone":null,"comments":0,"created_at":"2015-01-21T17:49:33Z","updated_at":"2015-01-21T17:49:33Z","closed_at":null,"body":"@Pika8tona Curious what you meant to put here (see the arrow and ? below), this is in the `vertwrapper()` function: should that last `else` be removed?\r\n\r\n```r\r\n  if(fxn == \"vertsearch\"){\r\n    qstr <- paste(args, collapse = \"%20\")\r\n  } else if(fxn == \"searchbyterm\" | fxn == \"bigsearch\"){\r\n    qstr <- paste(names(args), args, sep = \":\", collapse = \"%20\")\r\n    qstr <- gsub(\":>\", \">\", qstr <- gsub(\":<\", \"<\", qstr <- gsub(\":=\", \"=\", qstr))) # Numerical query\r\n  } else if(fxn == \"spatialsearch\"){\r\n    qstr <- paste(\"distance(location,geopoint(\", \r\n                  paste(args$lat, args$long, sep = \",\"), \"))<\", args$radius, sep = \"\")\r\n  } else { # Additional functions\r\n    ##### ????? <<<<------\r\n  } \r\n```"}}